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actualidad 



herramientas útiles para tra- 
bajar con un equipo de 
grandes posibilidades po- 
tenciales, pero que hasta 
ahora no había sido desarro- 
llado suficientemente. 

En éste SONIMAG-87, 
SONY ha roto una lanza en 
este sentido y ha presenta- 
do un amplio catálogo de 72 
páginas en el que figura to- 
da la gama de productos 
MSX que dicha firma co- 
mercializa en la actualidad, 
tanto en el terreno del soft- 
ware como del hardware. 

En éste catálogo, ordena- 
dos por materias, figuran 
programas de educación en 
cartucho y cinta, lenguajes 
de programación, material 
didáctico, aplicaciones, ges- 


SONY sigue manteniendo 
un fuerte compromiso con 
el sistema MSX como lo de- 
muestra el hecho de su pre- 
sencia en el SONIMAG-87 
con un amplio STAND en el 
que figuraban todos los or- 
denadores, periféricos y 
programas que la multina- 
cional japonesa sigue lan- 
zando al mercado. 

En el Salón del Sonido la 
Imagen y la Electrónica, ce- 
lebrado en Barcelona entre 
el 28 de octubre al 4 de sep- 
tiembre, la informática no 
tenía una representación 
muy nutrida, y las pocas fir- 


mas de este sector que acu- 
dieron al certamen (con la 
excepción de AMSTRAD) 
no presentaban muchas in- 
novaciones, sin embargo 
SONY sí ha dado un paso 
importante de cara a revita- 
lizar un sistema de ordena- 
dores que tanta aceptación 
ha tenido en nuestro país. 
Los equipos MSX presenta- 
dos por SONY en el SONI- 
MAG-87 han ido respalda- 
dos por algo que siempre 
hemos hechado de menos 
los usuarios de éste sistema 
como son las utilidades, 
aplicaciones y demás 
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t¡ón, juegos y entreteni- 
mientos, libros, revistas, 
etc., así como toda la gama 
de ordenadores y periféricos 
disponibles en el actual mer- 
cado nacional pertenecien- 
tes a la firma SONY. 

Los ordenadores HIT-BIT 
más novedosos son básica- 
mente tres, el HB-20P per- 
teneciente a la primera ver- 
sión del sistema MSX y los 
MSX 2, HB-F9S y HB 
F700S. 

El primer equipo es una 
versión evolucionada de la 
ya clásica línea HIT-BIT, de 
reducido tamaño, presenta 
dos ranuras superiores para 


conexión de cartuchos, co- 
nexiones para monitor o TV, 
2 salida para joysticks y co- 
nectares para cassetta e im- 
presora centronic, el resto 
de características de este 
aparato aparecen en el cua- 
dro número 1. 

El modelo HB-F9S es una 
variación más económica y 
compacta de los equipos 
HIT-BIT MSX 2 que como 
todos recordaréis aparecie- 
ron en el mercado incorpo- 
rando por un lado el teclado 
independiente y por otro la 
unidad central con la diske- 
tera y todas las conexiones 
del equipo. 




LA INSTRUCCION 

S6UM1 

AL DESCUBIERTO 

Z a pasóte 


Una vez aclarado como funcionan 
los tres canales (A, B, C) independien- 
tes del PSG y los registros que perte- 
necen "exclusivamente" a cada uno 
de ellos, tenemos que los registros 0 y 
1 controlan el tono (agudo/grave) del 
canal A y el registro B la amplitud o vo- 
lumen de dicho canal, de la misma for- 
ma funcionan los registros 2, 3 y 9 en 
el canal B y los registros 4, 5 y 10 en 
el C. 

Vamos a profundizar más en el te- 
ma y a conocer cual es la misión del 
resto de los registros del PSG. Hasta 
ahora si hacemos sonar simultánea- 
mente dos canales, introduciendo por 
ejemplo: 

10 SOUND 8,15: SOUND 0,50 

20 SOUND 9,15: SOUND 3,15 

La única forma que conocemos de 
desactivar uno de ellos es poner a ce- 
ro su registro de control de amplitud, 
es decir, introducir SOUND 8,0 o bien 
SOUND 9,0 según el canal que desee- 
mos interrumpir. Pues bien el genera- 
dor programable de sonido posee un 
registro que además de ser capaz de 
interrumpir la emisión de tonos de ca- 
da canal nos va a dar a conocer una 
posibilidad más de dicho generador. 

Hemos visto o escuchado para ser 
más exactos, como un canal es capaz 
de emitir una nota, digamos limpia con 
una amplia diversidad de tonos. Pues 
bien esto es debido a que ai conectar 
nuestro MSX el registro 7 del PSG ac- 
tiva únicamente la salida de tono de 
cada canal manteniendo desactivada 
la salida de ruido de cada uno de 
ellos. Veamos cual es la estructura de 
dicho registro y así entenderemos es- 
to con mayor facilidad. 


El registro siete posee 8 bits de los 
cuales en este artículo sólo vamos a 
tratar los 6 menos significativos ya que 
los dos restantes los utiliza el ordena- 
dor para controlar los joysticks y no in- 
tervienen para nada en la generación 
de sonidos. (Ver fig. 1). 


F¡g. 1 


EL REGISTRO 7 

Decir que el resgistro siete activa 
únicamente las salidas de tono y no las 
de ruido de los tres canales al ser en- 
cendido nuestro ordenador, traducido 
a lenguaje informático es lo mismo que 
decir que en este momento los tres bits 
menos significativos de dicho registro, 
es decir, los situados más a la derecha 
del mismo toman valor cero mientras 
los tres restantes toman valor uno, co- 
mo veis en este caso y al contrario que 
en otras ocasiones, el que un determi- 
nado bit tome valor cero significa que 
la salida que controla está activada y 
se desactivará cuando el valor de di- 
cho bit sea igual a uno. De este modo 
él que el registro 7 mantenga activa- 
das las salidas de tono, significa que 
su valor tendrá que ser: 111000. Siem- 
pre que nos refiramos a este registro 
utilizaremos notación binaria, ya que 
asi nos será mucho más sencillo saber 
qué salidas tenemos activadas. Por lo 
tanto si quisiéramos reinicializar el re- 
gistro 7 no tendríamos mas que intro- 
ducir el mencionado valor de la si- 
guiente forma: SOUND 7, & B1 11000. 



Una vez explicada las funciones que 
' cumplen los 6 bits del registro 7 vamos 
a ver cómo funcionan en la práctica 
con algunos ejemplos: comprobemos 
primero cómo suena un canal cuando 
activamos la salida de ruido. 

En el pequeño programa anterior en 
el que hacíamos que dos canales emi- 
tiesen simultáneamente dos tonos di- 
ferentes vamos a introducir una nueva 
línea con el siguiente formato: 

30 SOUND 7, &B1 11000 

Si ejecutamos ahora nuestro progra- 
ma veremos que nada ha cambiado, 
ambos canales siguen funcionando del 
mismo modo como ya hemos visto, 
esto es debido a que la línea 30 no al- 
tera el valor con que el registro 7 es ini- 
cializado por el ordenador. Tampoco 
sucederá nada si introducimos la línea 
30 del siguiente modo: 

30 SOUND 7, &B11100 

Ya que todavía el registro 7 mantie- 
ne activadas las salidas de tono de los 
dos canales (A y B) que hemos pro- 
gramado. En cambio carguemos aho- 
ra el mencionado registro con el si- 
guiente valor: 

30 SOUND 7, &.B100100 

Como podéis observar, ahora el so- 
nido emitido por nuestro ordenador es 
bastante distinto, ya que hemos acti- 
vado las salidas de ruido de nuestros 
dos canales y ambos están emitiendo 
tono y ruido al mismo tiempo. Desac- 
tivemos ahora las salidas de tono: 

30 SOUND 7, &B100111 

y comprobaremos que de nuevo el so- 
nido generado porel PSG se ve modi- 
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ficado. Por último vamos a ver como 
el registro siete es capaz de silenciar 
totalmente la emisión de sonido de 
nuestro ordenador desactivando todas 
las salidas de tono y de ruido del PSG 
del siguiente modo: 

30 SOUND 7, &B111111 

Si activamos la salida de ruido de un 
canal y desactivamos el resto de sali- 
das haciendo por ejemplo 10 SOUND 
7, &B110111, podremos observar que 
el nivel de ruido no varia por más que 
modifiquemos los valores de los regis- 
tros de control de tono (en nuestro 
ejemplo los registros 0 y 1). Podemos 
hacer la prueba introduciendo la si- 
guiente linea: 30 SOUND 1,15: 
SOUND 0,200 y sustituyendo los valo- 
res de dichos registros por cualquier 
otro sin que el sonido por el PSG varié 
lo más mínimo. 

Ésto es debido a que los registros 0 
y 1 del canal A o los registros 2 y 3 del 
B o 4 y 5 del canal C son registros de 
control de tono y no de control de 
ruido. Para controlar el nivel de ruido, 
el AY-3-8910 utiliza el registro 6 del 
cual sólo sus cinco bits menos signifi- 
cativos sirven para alterar dicho nivel 
de ruido. Los tres restantes bits de di- 
cho registro no se utilizan. Así los va- 
lores entre los que podremos variar di- 
cho nivel de ruido irán desde 00000 BI- 
NARIO = 0 decimal, hasta 11111 BI- 
NARIO = 31 decimal. Siempre que 
utilicemos este registro usaremos no- 
tación decimal teniendo siempre en 
cuenta no rebasar el valor 31 que es el 
máximo nivel de ruido que el PSG pue- 
de alcanzar. Veamos lo que sucedería 
si dieramos al registro 6 un valor ma- 
yor que 31, por ejemplo el valor 33, el 
número binario que corresponde al de- 
cimal 33 es 100001, como el registro 6 
no utiliza mas que sus cinco bits me- 
nos significativos ignorará el uno situa- 
do más a la izquierda de dicho núme- 
ro binario y por lo tanto sólo tendrá en 
cuenta el valor 00001, binario = 1 
decimal. 

Si introducís estas líneas en el or- 
denador 

10 SOUND 7, &B110111 

20 SOUND 8,15, SOUND 6,1 

y las ejecutáis y luego sustituís el valor 
1 del registro 6 por 33 volviéndolas a 
ejecutar, comprobaréis en la práctica 
lo expuesto anteriormente. 

Desgraciadamente el PSG no posee 
más que un registro (el 6) para contro- 


lar el nivel de ruido de los tres cana- 
les. Por lo tanto si hacemos que dos o 
más canales emitan ruido simultánea- 
mente, podremos conseguir que cada 
uno lo haga con un volumen diferente 
gracias a los registros 8,9 y 10 pero el 
nivel o grado de ruido será sierripre 
idéntico para los tres y vendrá deter- 
minado por el valor que asignemos al 
mencionado registro 6. 

Con lo explicado hasta aquí y un po- 
co de práctica ya tenemos a nuestro al- 
cance la posibilidad de enriquecer 
nuestros programas con una amplia 
gama de efectos sonoros. Como ejem- 
plo aquí os ofrecemos una pequeña ru- 
tina que simula, cada vez que se pulsa 
la barra espadadora, la caída de una 
bomba, introducid el siguiente listado, 
subid al máximo el volumen del televi- 
sor o monitor y ejecutad el programa, 
vereis que el efecto es bastante real. 

Listado 1 



Todavía nos restan por explicar tres 
registros del PSG (11,12 y 13), que se 
encargan del control de envolventes. 

Habíamos visto como los registros 
8,9 y 10 determinaban el volumen de 
cada canal para valores comprendidos 
entre 0 y 15 (1111 bin.). Esto es, di- 
chos registros utilizan sus cuatro Bits 
menos significativos para controlar la 
amplitud o volumen de cada canal. Así 
si quisiéramos por ejemplo hacer que 
el canal emitiese un ruido cuyo volu- 
men subiera lentamente desde 0 hasta 
quince y volviese a bajar y así repeti- 


das veces con lo que hemos visto has- 
ta ahora, tendríamos que hacer un lis- 
tado más o menos como el siguiente: 

Listado dos 



Como podéis ver este programa, 
además de ser. bastante largo mantie- 
ne ocupado a la CPU de nuestro orde- 
nador en incrementar y decrementar 
los valores del registro 8 sin que ésta 
pueda realizar al mismo tiempo otras 
tareas. 

Sin embargo utilizando los registros 
de control de envolventes podemos re- 
ducir el programa anterior a las si- 
guientes lineas: 

Listado 3 



Ejecutad este pequeño listado y 
comprobaréis que funciona práctica- 
mente igual que el anterior, sólo que 
este último además de ser bastante 
más corto deja libre a la CPU para que 
ésta pueda realizar otros trabajos 
mientras el PSG funciona por su cuen- 
ta sin necesidad de que le introduzca- 
mos nuevos valores. 

Si os fijáis en la linea 20 de éste pe- 
queño programa observaréis que he- 
mos dado al registro 8 valor 16 (10000 
bin.), cuando anteriormente habíamos 
dicho que los registros de control de 
amplitud (8, 9 y 10) sólo utilizaban sus 
cuatro bits menos significativos para 
regular el volumen de cada canal y por 
lo tanto el máximo valor que podían al- 
canzar era 1111 BIN = 15 decimal. 
Pues bien, al dar a un registro de con- 
trol de amplitud valor 16 (10000 bin.), 
lo que estamos haciendo es activar el 
quinto bit de dicho registro con lo que 
hacemos qué el control de amplitud de 
su canal pase a estar a cargo de la en- 
volvente u onda portadora que elija- 
mos según el valor que demos al regis- 
tro 13. 

Este registro utiliza sus cuatro bits 
menos significativos para generar dis- 
tintos tipos de envolventes, así pues 
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sería lógico pensar que el PSG posee 
16 hondas portadoras diferentes cuan- 
do en realidad y de un modo anómalo 
sólo tiene ocho.- 

En el ejemplo anterior vimos como 
la envolvente numero 1.4 (SOUND 13, 
14) hacia que ~eí volumen del canal de- 
pendiente de ella partiera desde su va- 
lor mínimo hasta el máximo (0-15) y 
volviese a descender al mismo ritmo 



Fig.2 


desde el valor máximo de volumen al 
mínimo (15-0) y así sucesivamente. Es 
decir, que en un tiempo determinado 
la onda portadora parte de 0, alcanza 
su valor máximo (15) y vuelve a des- 
cender (a 0). Este tiempo se denomi- 
na periodo de la envolvente (fig. 2) 
y será controlado por los registros 11 
y 12 como veremos a continuación. 
Pero primero vamos a conocer de mo- 
do gráfico cuales son los distintos t¡- 


Fig . 3 



pos desenvolventes que podemos se- 
leccionar desde el registro 13. 

Puesto que ya habíamos explicado 
cómo se comporta la envolvente nú- 
mero 14 y atendiendo a su gráfica po- 
dréis ver fácilmente cómo funcionan el 
resto de ondas portadoras. 

Sólo una observación más; no es 
posible fijar una envolvente distinta pa- 
ra cada canal, así pues todos los cana- 
les en cuyos registros de amplitud se 
active el bit numero 5 (es decir, tomen 
valor 16) pasarán a depender de una 
misma envolvente. 

Los registros 11 y 12 actúan conjun- 
tamente en el control del período de la 
envolvente, ambos registros pueden 
utilizar para sus 8 bits, es decir, ambos 
pueden tomar valores entre 0 y 255 pe- 
ro para el PSG los valores que tome el 
registro 12 son mucho más significati- 
vos que los que tome el registro 1 1 . Es 
decir, si el registro 12 toma valor 255 
el periodo de la envolvente será mu- 
cho mayor que si es el registro 1 1 el 
que adquiere dicho valor. 

Esperamos que este artículo os ha- 
ya servido para desvelar el funciona- 
miento del generador programable de 
sonidos de vuestro ordenador. De to- 
dos modos para que practiquéis un po- 
co más, en la sección de trucos os 
ofrecemos algunos ejemplos que segu- 
ramente sabréis aprovechar. 


L.A.S.A. 



GENERADOR 

Di 

SOIDOS ' 

Como complemento a los 
dos artículos referentes al so- 
nido hemos incluido éste pro- 
grama. Se trata de un editor 
de sonidos con el que po- 
drás crear efectos sonoros 
de gran variedad moviendo 
el cursor por la pantalla. 

En pantalla se muestran los 
14 registros que podemos 
modificar con su valor en bi- 
nario y un pequeño comen- 
tario de la función que reali- 
zan. Además también nos 
aparecerá el cursor. Este po- 
demos desplazarlo con fle- 
chas de dirección. Pulsando 
la barra modificamos el bit 
sobre el que se encuentra. 
Se hará 1 si es 0 y 0 si es 1 . 

También se incluyen varias 
funciones más accesibles 
desde teclado con las si- 
guientes teclas: 

= (+)■ Sumó uno al dato y 
nos muestra como resultado 
un número en decimal. 

— . Resta uno al dato binarlo 
y muestra el resultado en de- 
cimal como en el caso an- 
terior. 

mim ÍRÍTURNJ. Carga el re- 
gistro Indicado por el cursor 
con el valor que se le haya 
dado. 

©, Borra todos los registros 
poniéndolos a cero. 

Muestra en la línea de 
mensajes una sentencia da- 
ta con los datos necesarios 
para producir los sonidos 
que hayas creado. 

©T1®L + STOP. Se abando- 
na el programa. 
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1000 ' -k-********************^^# 

* GENERADOR DE SONIDOS * 

1 

* : 

j **********************«.* 

1 020 ' 


1030 ' 


1 040 ' 


1050 KEYOFF 


1060 BEEP 


1070 SCREEN 3,„0 ; 

1080 COLOR 1 

15,15 í 

1090 CLS 


1100 A=RND(~TIME) 

1110 OPEN "GRP: ” AS#1 

1120 PRESET (0,0) 

| 1.130 PLAY "VI 

5T20004BBBAGFEDC03BAGFED 

CQ2BAGFEDCCC 1 

, " V i 5T20006BBBAGFEDC05BA 

GFEDC04BAGFEDCCC" ' 

1140 FOR A=1 

TO 60 ! 

1150 COLOR 1+RND(1)*13 í 

1160 PR I NT# 1 , 

" SOUND»" 

1170 NEXT A 


1180 CLOSE 


1190 FOR A=1 

TO 1000 

1200 NEXT A 


1210 ON STOP 

GOSUB 1810 

1220 STOP ON 


1230 SCREEN 0 

> jG 

1240 COLOR 1, 

15 

1250 LOCATE , 

,0 

1260 PRINT"*K-K-)í-H-*'K-*-K.***** í f.**#**** # * 1í . # 


GENERADOR DE SONIDOS *+ 

LRtASOUND 

•tHi-********# " 


1270 PRINT "00 

00000000 -Tono A: Byte 

Inferior 0 1 

00000000 Byte 

Super i or " 


1280 PRINT "02 

00000000 -Tono B: Byte 

Inferior 03 

00000000 Byte 

Super i or " 


1290 PRINT "04 

00000000 -Tono C: Byte 

Inferior 05 

00000000 Byte 

Super i or " 


1300 PRINT "06 

00000000 -Generador Ru 

ido (0-31) 07 

00000000 -Habilita Voz 

y Ruido 08 

00000000 -Amplitud voz 

A 09 

00000000 -Amplitud voz 

B 10 

00000000 -Amplitud voz 

C 11 

UOOOOOOO -Periodo env. 

byte i nf . " 


1310 PRINT" 12 

OOOOOOOO 

byte sup. 13: 

00000000 -Forma de la 

envolvente " 




***********" 

K >t ******••)«• ******* 

1330 DIM Si (13) i 

1340 DEF FN Bi ( N ) =R I GHTÍ ( " 00000000 " +B 

INi(N) ,8) 


1350 FOR A=0 TO 13 

1360 SOUND A , 0 


1370 Sí (A) =" 00000000 " 

1380 LOCATE 4,A+4 
1390 PRINTSÍ (A) ; 

1400 NEXT A 
1410 X=0:Y=0 
1420 D=STICK (O) 

1430 IFD=10RD=20RD==3THENX‘=X-1: IFX<OTH 
ENX=0 

1440 IFD=40RD=50RD=6THENX=X+1 : IFXM3T 
HENX=13 

1450 IFD=20BD=3DRJC)~4THEWY=YJ-L: IFY>7TH 
ENY=7 

1460 I FD=60RD=7DRD=8THEN Y= Y- 1 : IFY<OTH 
ENY=0 

1470 LOCATE Y+4,X+4,1 

1480 IFSTRIG (O) =— 1THENG0SUB 1560 

1490 AÍ=INKEYÍ 

1500 IF Aí=" =" TIHEN GOSUB 1610 
1510 IF Aí="— " THEN GOSUB 1640 
1520 IF AÍ=CHRÍ < 13) THEN GOSUB 1590 
1530 IF AÍ="C" THEN BEEF': GOTO 1350 
1540 IF INKEYÍ="D" TI-IENGOSUB 1730 
1550 GOTO 1420 
1560 Aí =M I Dí ( Sí ( X ) , Y+ 1 , 1 ) 

1570 • IFAÍ=" 1 "THENMIDi ( Si ( X ) ,Y+1 , 1)="0 
" s LOCATE Y+4 , X +4 , 0 : PR I NT " O " 

1 580 I FAÍ= " O " TI-IENM I Di ( Sí ( X ) , Y+ 1 , 1 ) = " 1 
LOCATE Y+4 , X+4 , O: PRINT" 1 " 

1590 SOUND X , VAL C " 8<B " +SÍ < X ) ) 

1600 RETURN 

1610 N= VAL ( " ?<B " +SÍ < X > ) : N=N+ 1 : I FN >255 
THEN N=255 

1620 Sí < X ) =FNBí < N > s L0CATE4 , X+4 , 0 : PR I N 
TSi(X) ¡LOCATE 9 , 20: PR INT" DATO EN DECT 
MAL : " ; N; " 11 

1630 GOTO 1590 

1 640 N=VAL ( " 8<B " +SÍ ( X ) ) : N=N- 1 s I FN< O TH 
EN N=0 

1650 GOTO 1620 
1660 LOCATE ,,0 
1670 FOR A=20 TO 22 
1680 LOCATE O, A 
1690 PRINT" 

1700 NEXT A 
1710 LOCATE 0,21 
1 720 RETURN 
1730 GOSUB 1660 
1740 PR INT" DATA 
1750 FOR A=0 TO 13 
1760 8=VAL < "&B"+St (A) > 

1770 PRINT RIGHTí ( "0"+HEXí (B.i ,2) ■ 

1780 IF A< 13 THEN PRINT","- ’ ’ 

1790 -NEXT A 
1800 RETURN 
1810 BEEP 
1820 LOCATE , ,0 
1830 STOP OFF 
1340 SCREEN O 
1850 RETURN 1860 
1860 PRINT" FIN" ' 

1870 PRINT: END 
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FICHERO 

Di PANTALLAS 


Os ofrecemos una rutina 
capaz de almacenar y lue- 
go imprimir más de 40 pan- 
tallas, empleando la me- 
moria paginada. 

Realmente con una ruti- 
na de una longitud despre- 
ciable, 127 octetos de me- 
moria, mas un buffer de 
768 bytes, donde almace- 
nar la pantalla temporal- 
mente, podemos por me- 
dio de la paginación de la 
memoria, almacenar hasta 
42 pantallas en SCREEN 1 


(modo de texto de 32 co- 
lumnas), en los 32 kbytes 
de los que disponemos al 
librarnos de la ROM. 

Una pantalla en 
SCREEN 1 ocupa en la me- 
moria de video una longi- 
tud de 32 columnas x 24 fi- 
las = 768 bytes, por esto, 
en los 32768 bytes que ob- 
tenemos al paginar la me- 
moria (direcciones de me- 
moria 0-32767), podemos 
almacenar, la friolera cifra 
de 32768/768 


42.6666667 pantallas, me- 
jor dicho, 42 pantallas, ya 
que la última nos "macha- 
ría" la zona del programa 
basic. 

Si deseáis ver la rutina 
en acción tendréis que te- 
clear el listado ensambla- 
dor aquellos que dispon- 
gáis de él, y el cargador 
BASIC, los que no lo ten- 
gáis. 

Antes de problarla te re- 
comiendo grabar todo en 
cinta, por si al teclear has 
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cometido un error. Si usas 
ensamblador graba el fi- 
chero fuente y luego la ru- 
tina con: 

B S AVE "CAS: FICH- 
PAN",&HD2FO,&HD36E 

Los que copien el carga- 
dor BASIC, la comproba- 
ción de CHECKSUM (su- 
ma de todos los datos in- 
troducidos) indicará si se 
ha cometido algún error. 
De ser así, revisa las líneas 
DATAS. Si el programa 
está libre de errores, con- 
tinuará grabando la rutina 
en cinta, pulsando la tecla 
SPACE. 

En este punto, ya esta- 
mos preparados para intro- 
ducir las dos demostracio- 
nes: 

• La primera de ellas, 
DEMOSTRACION 1, im- 
prime en BASIC pantallas 
de la 0 a la 40, estas las al- 
mecena en memoria y lue- 
go las saca una tras otra. 

• La DEMOSTRACION 
2, simula un efecto de ani- 
mación, sacando rápida- 
mente 21 pantallas, una 
tras otra. 

Lo primero que hace el 
programa es dibujar círcu- 
los concéntricos cada vez 
mayores, y cada círculo es 
almacenado como si de un 
fotograma se tratase. 

A continuación, sacan- 
do las pantallas rápida- 
mente, vemos como un 
círculo parece agrandarse 
en la pantalla y luego redu- 
cirse. Si deseas que sólo 
se agrande, cambia la línea 
330 por: 330 GOTO 290 

A continuación vamos a 
detallar las características 
de la rutina y la forma de 
usarla: 

- Comienza la direc- 

ción de memoria 54.000 y 
finaliza en la 54.126. 

El buffer que se usa 

para almacenar temporal- 
mente la pantalla, ocupa las 
posiciones 54127-54894. 

El número de la pan- 
talla que vamos a imprimir 
o guardar, hay que PO- 
KEarlo, en la dirección 
54012 (&HD2FC). Ejem- 
plo: 




57 

D34A 

010003 


L..D 

E<C , 768 


58 

D34D 

EDBO 


LDIFí 



59 

D34F 

CD68D3 


CAL.L 

PAGOFF 


60 - 

D352- 

C9 


RET 



' PAGE 

2 






61 







62 

D353 

F3 

FAGON: 

DI 


; FAGINA MEMORIA 

63 

D354 

0EA8 


LD 

C , 1 68 


64 

D356 

ED78 


IN 

A, (C) 


65 

D358 

32FDD2 


LD 

(DATO) „ A 


66 

D35B 

47 


LD 

B , A 


67 

D35C 

CB38 


SRL 

B 


6B 

D35E 

CB38 


SRL 

B 


69 

D360 

CB38 


SRL 

B 


70 

D362 

CB38 


SRL 

B 


71 

D364 

BO 


OR 

B 


72 

D365 

x> 

co 


OUT 

(168), A 


73 

D367 

C9 


RET 



74 



¡¡ 




75 

D368 

3AFDD2 

PAGOFF; 

L.D 

A, (DATO) 

; DESFAGINA 

76 

D36B 

D3A8 


OUT 

(168) , A 


77 

D36D 

FB 


El 



78 

D36E 

G9 


RET 



79 







80 



BUFFER; 

DEFS 

768 


81 



» 




82 




EIMD 




LISTADO DE ETIQUETAS 


PASE 

BUFF'ER 
OPERA* 
RAMV I D 
VI DRAM 


D36F DATO 
D2FE PAWTA 
D31D SUMA 
D3.10 


D2FD METE ■ 
D2FC PABOM 
D309 SACA 


D32A METE2 
D353 PAGOFF 
D33D SACA2 


D32D 

D368 

D344 


Si hacemos POKE 
&HD2FC,10 todas las ope- 
raciones que se realicen 
serán referentes a la pan- 
talla 10 de la memoria pa- 
ginada. 

La rutina tiene cua- 
tro entradas posibles, cada 
una de ellas realiza una 
función diferente: 
o Llamando a la direc- 


ción 54000 (&HD2FC), el 
contenido actual de la pan- 
talla de vídeo es guardado 
en la memoria. El número 
de la pantalla donde se al- 
macena es el indicado en 
la posición de memoria 
54012. 

® Para sacar la pantalla 
deseada de la memoria a 
nuestra pantalla, tendre- 
mos que llamar a la direc- 


ción 54003 (&HD2F3). En 
la posición 54012 debe es- 
tar el número de pantalla a 
sacar. 

Las dos entradas que 
vienen a continuación han 
sido pensadas para que 
sea posible la grabación y 
la posterior carga de pan- 
tallas en la memoria pa- 
ginada: 

° Llamando a la posi- 


ción 54006 (&HD2F6), el 
contenido del BUFFER es 
almacenado en la memo- 
ria. (Operación de carga, 
LOAD). 

• Para pasar una panta- 
lla de la memoria al BUF- 
FER, hay que llamar a la di- 
rección 54009 (&HD2F9) 
Para grabar la pantalla en 
cassette tendrás que gra- 
bar el contenido del buffer. 
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Si no comprendes clara- 
mente como se cargan y 
se graban las pantallas de 
• la memoria paginada, es- 
tudia los listados de de- 
mostración 3 y 4. La de- 
mostración 3 realizaría el 
proceso de carga, LOAD, 
y la demostración 4 el de 
grabación, SAVE. 

El número de pantallas 
que se desean cargar o 
grabar está especificado 
entre ambos ejemplos, por 
la variable P del bucle 
FORNEXT. 

Hasta aquí creemos ha- 
ber proporcionado la infor- 
mación necesaria para el 
control de la rutina, no 
obstante, aquellos que de- 


seen conocer su funciona- 
miento pueden continuar 
leyendo. 

Como seguramente sa- 
brás, el Z-80 puede mane- 
jar un área de memoria de 
hasta 64 k. Pero con la 
ayuda del "PPI 8255", es- 
tos 64 k pueden ser selec- 
cionados de un banco de 
memoria mayor. Este ban- 
co está formado por cua- 
tro "ranuras" que pueden 
contener, cada una, hasta 
64 k. Se selecciona la me- 
moria en bloques de 16 k 
llamados páginas, de for- 
ma que el Z-80 puede di- 
reccionar 4 de estas pá- 
ginas. 

Para realizar esta selec- 


ción de páginas, hemos de 
enviar por ej puerto A del 
PPI (&HA8) un byte, don- 
de cada pareja de bits in- 
dica de qué ranura se ha 
de tomar cada una de es- 
tas cuatro páginas. Los 2 
bits menos significativos 
para la página 0 (0-16383), 
los dos siguientes para la 
página uno (16384-32767), 
y así, sucesivamente. 

Hay que tener en cuen- 
ta que una página única- 
mente puede estar ante el 
procesador, en la misma 
situación que ocupa en su 
ranura. 

Los ordenadores MSX 
disponen de 4 ranuras, una 
de ellas es ROM, otra es 


10 


CARGADOR BASIC 


FICHERO PANTALLAS 


50 OLEAR 200,53999! 

60 RESTORE 9000 
70 8=0 

80 FOR A=8<HD2FO TO &HD36E 

90 READ B 

100 S=S+B 

110 POKE A,B 

120 NEXT 

130 IF S< >16159 TRIEN PRI NT "ERROR EN DATA 
S " s END 
1 40 CL...S 

150 PRI NT "PULSA SPACE PARA GRABARLO" 

160 IF STRIG <0) 0—1 THEN 160 
1 7 O BS AVE " CAS s F I CH-P AN " , &HD2F0 , 8cHD36E 
ISO END 

9000 DATA 195,42,211, 1 95 , 6 1 ,211,1 95 , 45 , 
2 1 1 , 1 95 ,68,2 .1. 1,14, SO , 53 , 252 
90 1 O DATA 2 1 O , 37 , 30 , O , 33 ,0,0,6,3,25,16 
"“1,17,111,211,201 

,24,17,111 ,211 , 1 


89 


9020 DAT 
20 1 , 3í 
DATA 


: , 1 1 .1 
1 7 , C 


5,16,211 ,205, 
9040 DATA 2C 
205, 104,21.1 „ 2 
9050 DATA 2C 
5,83,211', 1,0, 
9060 DATA 1C 
O , 50 , 253 , 2 1 O , 
9070 DATA 20 


,211 

, 24 , 1 , 0 „ 2 
4,210 
83 , 211 , 2 ." 

29 , 211 , ’ 


: , 205 , 
205,92,0,201 ,20 


, 1 ,0,3, 


1 1 


ÍO.1. 


05 254 , 2 1 0 

237, 176,205 

211, 20 1 , 243 14,168,237 

, 203 , 56 , 203 , 56 

56 , 203 , 56 , 1 76 ,211,1 68 , 

, 168,251,201 


RAM, y las otras dos se 
usan para incorporar car- 
tuchos o como bus de ex- 
pansión. La situación de 
estas ranuras, cambia de 
unas firmas a otras, por 
ello a la hora de paginar, 
es necesario seguir un pro- 
ceso que nos asegure la 
total compatibilidad. 

La rutina de paginación 
que hemos usado, la pue- 
des ver en las líneas 62-73 
del listado ensamblador. 
Su misión será sustituir los 
32 k de ROM por los 32 k 
de RAM de la otra ranura. 

Lo primero que hace- 
mos es desactivar las in- 
terrupciones, luego lee- 
mos el valor actual del 
puerto A del PPI, y alma- 
cenamos su contenido en 
una posición de memoria 
etiquetada como DATO, 
para recuperarlo al "des- 
paginar" la memoria. 

En el dato leído, los cua- 
tro bits superiores nos di- 
cen en qué ranura están 
las páginas de RAM, por 
ello lo que hacemos es co- 
piarlos en la mitad inferior 


; DEMOSTRACION 1 

DEFUSR 1 =54000 ! 
DEFUSR2=54003 ! 
DEFUSR3=54006 ! 

D E F U S R 4 = 5 4 O O 9 r 


SO FOR A=C 
90 CLS 
100 FOR B= ; 
1 1 O PR I NT 


TO 40 


O TO 10 
"PANTALLA" 


15 


NEXT 


130 POKE &HD2FC , A 
140 B=IJSR1<0> 

150 NEXT 
160 ' 

170 FOR A= 

BEEP 


TO 


ISO 


NEXT 


200 


FOR A=0 TO ■< 
POKE &HD2FC , 
B=USR2<0) 

FOR B=0 TO S 
NEXT 
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del byte, para que las cua- 
tro páginas sean tomadas 
de la ranura de RAM. 

Este dato lo enviamos 
de nuevo por el canal A del 
PPI, quedando de esta for- 
ma paginada la memoria. 

La rutina con la que 
"despaginamos'' (líneas 
75-78), es muy sencilla, se 
reduce a recuperar el valor 
contenido en DATO y sa- 
carlo por el canal A del PPI 
para recuperar la situación 
original. Luego se activan 
las interrupciones. 

Es muy importante man- 
tener las interrupciones 
desactivadas mientras la 


memoria esté paginada, ya 
que al no disponer de la 
ROM, tendríamos que 
controlar el salto que se 
realiza al producirse la in- 
terrupción. 

El resto de las subrutinas 
son de gran sencillez: 

OPERA, calcula a partir 
del número de pantalla 
contenido en la etiqueta 
PANTA, la dirección en la 
memoria paginada. Este 
valor es devuelto en el re- 
gistro HL, y en DE se car- 
ga la dirección de inicio del 
BUFFER. 

VIDRAM, se encarga de 
pasar el contenido de la 


10 ' DEMOSTRACION 
20 ' 


4 c: 


SO DEFUSR 1 =54000 ! 
D E F LJ S Fí 2 = 5 4 O O 3 ! 
D E F Ll S R 3 = 5 4 O O 6 ! 
DEFUSR 4 =54 O 09! 


80 PI=3. 14159 
90 FOR A=0 TO 20 
100 SCREEN 1 
110 PRINT " F’A : " ; A 

120 FOR B=0 TO 2*PI STEP PI/<A+1) 
130 X=15+A*C0S<B> 

140 Y=1 1+A*SIN(B) 

150 IF X<0 TREN 200 
160 IF Y < O TREN 200 
170 IF X >3 1 TREN 200 
ISO IF Y >23 TREN 200 
190 LOCATE X. ,Ys PRINT"*" ; 

200 NEXT 

2.10 POKE ?<HD2FC , A 
220 B=USR 1 (O) 

230 NEXT 


250 FOR A= 1 
260 BEEP 
270 NEXT 


TO 30 


290 

300 


FOR A=Ü TO 20 
POKE &HD2FC , A 
B=USR2 < O) 

NEXT 

BEEP 

FOR A=20 TO O STEP • 
POKE &HD2FC.A 
B=USR2(0) 

NEXT 
BEEP 
BOTO 2*0 


memoria de video a nues- 
tro BUFFER, en la RAM. 

RAM VID, realiza la ope- 
ración inversa de VI- 
DRAM, pasa el contenido 
del BUFFER a la pantalla 
de video. 

METE, pasa la pantalla 
de video a la memoria pa- 
ginada. Para hacerlo, lla- 
ma a VIDRAM, luego a 
OPERA, e intercambia los 
valores de HL y DE, se ac- 
tiva la paginación, se 
transfiere el bloque de da- 
tos de la pantalla, se des- 
pagina y se regresa al BA- 
SIC. 

METE2, es igual que 
METE pero no realiza la 
primera llamada a VI- 
DRAM, por lo que tanto ló 
que hace es que pasa el 


10 • DEMOSTRACION Z 
30 ■ CAR6A (LDAIJ.I 

50 DEFUSR 1=54000 
60 DEFUSR2=54003 
70 DEFU5R3=54006 
SO DEFIJSR4=54009 


140 N*=*"CAS:" 


SO A=U8f 
00 NEXT 


contenido del BUFFER a la 
memoria paginada. 

SACA, llama a SACA2, 
luego a RAMVID y regre- 
sa. Su función es pasar el 
contenido de la memoria 
paginada a la pantalla de 
VIDEO. 

SACA2, pasa los datos 
de la pantalla en la memo- 
ria paginada, al BUFFER. 
Para hacerlo, llama a OPE- 
RA y PAGON para paginar 
la memoria y obtener las 
direcciones que nos van a 
permitir pasar el bloque de 
datos de 768 bytes me- 
diante un sencillo LDIR. 
Hecho esto, se despagina 
y se retorna. 

Esperamos que tras esta 
explicación os sea más fá- 
cil comprender como se 
pagina la memoria. Verda- 
deramente no es un tema 
complicado, pero hay que 
considerar tres puntos: la 
compatibilidad, la ausen- 
cia de la ROM y la acción 
de las interrupciones. 

Posibles aplicaciones de 
la rutina FICHERO ' DE 
PANTALL serían: La crea- 
ción de juegos con mu- 
chas pantallas, almacena- 
miento de texto en progra- 
mas de tratamiento de tex- 
to, efectos de animación y 
un sin fin de posibilidades 
abiertas a tu propio inge- 
nio. 


10 * DEMOSTRACION 4 
20 * 

30 ' GRABACION <SAVE) 

40 ' 

50 DEFUSR 1 =54000 ! 

60 DEFUSR2=54003 ! 

70 DEFUSR3=54006 ! • 

SO D E F U S R 4=54 O O 9 ! 

90 ' 

100 BUFFER=8<HD2F6 
110 ' 

120 FOR P=0 TO 5 
130 ' 

170 POKE 54012! , P 
ISO A=USR4 (O) 

.1 90 ' 

1 9 1 N*= 11 CAS : " +STRT ( P ) 

1 92 BSA VE m , BUFFER , BUFFER+763 

193 ' 

200 NEXT 
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Cubiletes es un juego 
sencillo donde se han em- 
pleado SPRITES de 16 x 16 
ampliados (32 x 32) para 
darle una mayor vistosidad 
(a costa de perder en la re- 
solución de las figuras). 

1000-1090. Lo primero 
que hace el programa es 
preparar la pantalla. Para 
ello, desactiva los "letre- 
ros" de las teclas de fun- 
ción, apaga los sonidos que 
pudiese haber y se fija el 
modo de texto 1 con SPRi- 
TES ampliados de 16 x 16 y 
con una anchura en panta- 
lla de 29 caracteres. Se dan 
los colores al papel, a la tin- 
ta y al borde, y se introdu- 
cen los datos de los SPRI- 
TES, directamente en la 
VRAM para hacerlo nos 
servimos del comando 
VPOKE. 

1100-1110. Dibujo de los 
marcadores que nos van a 
informar de los puntos con- 
seguidos y de los fallos que 
tengamos. Se imprimen 
además los recuadros que 
contienen la numeración de 
los cubiletes. 

1730-1150. Aquí pinta- 
mos por primera vez los cu- 
biletes, ponemos las varia- 
bles de los PUNTOS y la de . 
los fallos a cero, y defini- 
mos en la variable P$, una 
función que nos permitirá 
transformar el número dado 


CUBILETES 

Como muchas veces habrás oido, "la mano es más rápida que la vista". Si deseas 
comprobarlo por tí mismo, aquí tienes éste programa. Existen tres cubiletes y ba- 
jo uno de ellos se esconde una pequeña bola que deberás encontrar. Al comienzo 
del juego el ordenador te mostrará donde se encuentra la bola y, a continuación, 
la cambiará de lugar. 


como parámetro a una ca- 
dena de cuatro dígitos. 

1160-1220. Se imprime el 
título y suenan unos breves 
acordes. En la línea 1190 
nos aseguramos de que el 
programa no continúe has- 
ta no acabar la música. Se 
borra el titulo y se sitúa el 
SPRITE de la bola. 

1230-1290. Se realizan 
varias llamadas a subruti- 
nas, que son las encargadas 
de levantar y luego bajar los 
cubiletes, y se limpia el bu- 
ffer del teclado. 

1300-1440. Se imprime el 
mensaje de que es nuestro 
turno y espera la pulsación 
de las teclas "1", "2" ó 
"3", valor que se pasa a nu- 
mérico y se guarda en la va- 
riable R, se realiza un soni- 
do, se imprimen los marca- 
dores y se levanta el cubile- 
te elegido. 

1480-1480. Se completa 
el bucle principal llamando 
a la subrutina de la 1910 en 


PUNTOS, 


FALLOS 

0004 


E¡ GD H 


caso de descubrir la bola, y 
a la rutina de la 2000 en ca- 
so negativo. 

A continuación, vienen 
las subrutinas donde se rea- 
lizan las operaciones del 
programa, éstas son: 

1490-1490. Inicializa el 
Sprite N. 

1500-1540. Levanta el cu- 
bilete número N. 

1550-1590. Baja el cubile- 
te número <n. 

1600-1760. Se fija la posi- 
ción de la bola al azar y se 
dibuja. 

1770-1800. Baja aquellos 
cubiletes que'están levanta- 
dos. Para hacerlo, consulta- 
mos con VPEEK el conteni- 
do de la VRAM. 


1810-1840. Sube los cubi- 
letes que estén bajados. 

1850-1890. Imprime mar- 
cadores. 

1900-1900. Ventana de 
texto de una línea. 

1910-1990. Correcto. Su- 
mar 5 puntos. 

2000-2080. Incrementa el 
número de fallos. Si éstos 
son mayores que 4, salta al 
final. 

2090-2210. Final. Mensa- 
je de GAME OVER. Pulsan- 
do "S". se comienza y pul- 
sando "N" el programa 
concluye. 

2220-2280. Rutina que in- 
troduce los datos de los 
sprites en la memoria de 
video. 


IODO 


*** *** ** ***** 


* CUBILETES 


************* 

1010 •' 

1020 ' 

1030 ' 

1040 ' 

1050 KEYOFF 
1060 BEEP 
1070 SCREEN 1,3,0 
1080 COLOR 1,2,2 
1090 BOSUB 2220' 

1100 LOCATE O , 2; PRINT" XWWWWWWWWY 
XWWWWWWWWY V PUNTOS V Y FALLO 

S V V V Y Y 

V OOOO Y V OOOO V ZWWWWWW 

WWC ZWWWWWWWWC" 

1110 LOCATE O, 17: PRINT" XWY X 

WY XWY VI Y Y2V Y3Y 

ZWC ZWE ZWC" 

1120 GOSUB 1730 
1130 P=0 
1140 F=0 

1 1 50 DEFFNP$ < F’ ) =R I GHTÍ < " OOOO " +M I D$ ( ST 
R$ (P) ,2,4) ,4) 
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1160 Ai=" — =< CUBILETES >= — " 

1170 GDSUB 1900 

USO PLAY " V1504CDEGEEE" , "V15Q6CDEGEE 
E" 

1 1 90 I F PLAY < O ) =- 1 THEN 1 1 90 
1200 Ai=" " 

■ 1210 GOSUB 19,00 
1 220 PUf SPR I TÉS , < 1 1 5y90) , 4 , 1 
1230 N=2 
1240 GOSUB 1500 
1250 GOSUB 1810 
1260 GOSUB 1600 
1270 FOR A=1 TO 50 
1 2S0 AÍ=INKEYi 
1290 NEXT A 

1300 Ai=“ ADIVINA DONDE ESTA" 

1310 GOSUB 1900 
1320' AÍ=INKEYÍ 

1330 IF Ai< " 1 " OR Ai > “ 3 " THEN 1320 
1340 R=VAL(AÍ) 

1350 Ai=" " 

1360 GOSUB 1900 

1370 BEEP 

1300 SOUND 0,15 

1390 FOR A= 1 00 TO 250 STEP 7 

1400 SOUND O, A 

1410 NEXT A 

1420 SOUND 0,0 

1430 N=R 

1440 GOSUB 1500 

1450 IF U=R THEN GOSUB 1910 ELSE GOSU 
B 2000 

1460 GOSUB 1770 
1470 GOSUB 1050 
1400 BOTO 1250- 

1490 PUTSPRITEN , <55+30*N,90> ,7,0:RETU 
RN 

1500 F0RA=90 TO 65 STEP -1 
1 5 1 0 F'UTSPR I TEN , ( 55+30*N , A ) 

1520 BEEP 

1530 NEXT A 

1540 RETURN 

1550 FOR A=65 TO 90 

1560 PUTSPRITEN, <55+30*N,A) 

1570 BEEP 
1500 NEXT A 
1590 RETURN 
1600 U=RND (-TIME) 

1 6 1 0 U= 1 + 1 NT < RND < 1 ) *3 ) 

1620 Ai= " ! ! ! CAMBIO LA BOLA ' ! ! ! " 

1630 GOSUB 1900 

1 640 PUTSF'R I TE5 , < 55+30*U ,90) ,4,1 

1650 FOR A= 1 TO 20 

1 660 SOUND 1 , 1 00+-RND ( 1 ) * 1 50 

1670 SOUND 0,15 

1600 FOR B=1 TO RND (1 ) *150 ' 

1690 NEX I B: SOUND 8,0 
1700 TUR £.(-nti 50 
1710 NEXT B 
1720 NEXT A 
1730 FOR N=1T03 
1740 GOSUB 1490 
1750 NEXTN 
1760 RETURN 


1770 FOR N=1T03 

1700 IF VF'EEk í 69 1 2+4*N J --9U THEN GOSUB 
1500 

1790 NEXTN 
1000 RETURN 
1010 FOR N=1T03 

. 1 820 I F VF'EEK (6912+ 4*N ) ~6ST HFN HOM ifi 
1550 

1 030 NEXT N 
1040 RETURN 
1050 LOCATE 6,5 
1060 F'RINTFNPT (P) 

1070 LOCATE 19,5 
1000 F’RINTFNPi <F) 

1090 RETURN 

1900 LOCATE 0,0 SPRINT" 

" : LOCATE O , 0 : F'R I NTTAB i i 
5-LEN (Aí) 72) ; Ai: RETURN 
1910 P=P+5 
1920 GOSUB 1050 ' 

1930 SOUND 8,15 

1940 FOR A=1 TO 10 

1950 FOR B=0 TO 255 STEP A 

1960 SOUND O , B 

1970 NEXT B 

1900 NEXT A 

1990 RETURN 

2000 F=F+ 1 

2010 GOSUB 1850 

2020 SOUND 1,1: SOUND 0,15 

2030 FOR A” 1 50 TO 255 STEP .2 

2040 SOUND O, A 

2050 NEXT A 

2060 SOUND 0 , O : SOUND 1 , O 
2070 IF F >4 THEN RETURN 2090 
2080 RETURN 
2090 GOSUB 17.70 . 

2100 GOSUB 1310 
2110 AÍ="GAME OVER" 

2120 GOSUB 1900 
2130 FOR A=i TO 2000 
2140 NEXT A 

2150 AÍ="OTRA PARTIDA (S/N) " 

2160 GOSUB 1900 

2170 F'OKE SíHFCAB , 255 

2180 Ai= I NKEYi 

2190 IF AÍ="S" THEN RUN 

2200 IF AÍ="N" THEN SCREEN O: END 

2210 GOTO 2180 

2220 DATA 7 , C , 1 9 , 1 3 , 37 , 27 , 27 , 33 , 3C , 3F 
, 3F , 3F , 3F , 3F , 1 E, 7 , EO , FO , F8 , F0 , FC , FC , F 
4 , CC , 30 , FC , FC , FC , FC , FC fFB , EO ,0,0, O , <:> , 
o , O , O , O , O , 1 , 2 , 3 , 3 ,1,0, O , O , O , O , O , O , O , O 
, O , O , 30 , CO , CO , CO , SO , O , O 
2230 RESTORE 2220 
2240 FOR A- 14 336 TO 14399 
2250 READ Bi 

2260 VPOKE A, VAL. ( "?.:H" + Bi) 

2270 NEXT A 
2200 RETURN 
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HISTORIA 


El super detective Mike 
Bronco de gran prestigio 
mundial ha sido contrata- 
do por el Alcalde de Chi- 
cago, con el fin de com- 
batir y eliminar ei crimen 
organizado que asoia la 
ciudad en estos años 
veinte. Pero es un trabajo 
difícil a pesar de la cate- 
goría de Mike, pues ha de 
enfrentarse cuerpo a 
cuerpo contra los cinco 
grandes Jefes y sus res- 
pectivos secuaces que tie- 
nen dominada y aterrori- 
zada toda la ciudad. 

Estos son los cinco Ca- 
pos contra los que debe 
luchar Mike Bronco: 

Ruddy Bulldog: je- 
fe de los atracadores, el 
que en poco tiempo ha 
conseguido ser el único 
responsable de todo tipo 
de robos en la ciudad, 
desde bancos hasta pas- 
telerías pasando por tien- 
das de frutos secos. 

Jonhny Fandan- 
go: Amo y señor de los 
contrabandistas de Chica- 
go, controla los negocios 
de alcohol, cocaína y por- 
celana china. 

_ Tony Spaguetty: 
Adoptó el cargo de jefe de 
los extorsionadores de he- 
rencia, temido por toda la 
ciudad incluyendo al Al- 
calde asi como el último 
borracho de la ciudad. 

Franky Frondasio: 

inspector de policía de 
profesión pero ejerce de 
todo lo contrario, permite 
y participa con sus adic- 
tos en todas las fechorías 
de los demás jefes, por lo 
que tratará de impedir que 
Mike termine su trabajo. 
Ya que ha dado orden de 
capturarlo vivo o muerto. 

El padrino: su his- 
toria es de sobra cono- 
cida. 

¡Animo super detecti- 
ve! a recorrer toda la ciu- 
dad y elimina uno por uno 
a los héroes del hampa. 

EL JUEGO 


Has de buscar por las 
92 pantallas de Chicago a 
los cinco grandes capos y 
eliminarlos. Antes de lle- 
gar a ellos, habrás de 
combatir con sus esbirros 
y al eliminarlos coger sus 
municiones, ya que las tu- 
yas no son eternas. 



COSA NOSTRA es un 

juego emocionante que 
une a su gran calidad grá- 
fica un nivel de dificultad 
elevado y gran número de 
diferentes pantallas (92); 
que constituye un reto pa- 
ra el jugador que siempre 
intentará llegar más lejos 
en su aventura. 

La respuesta de MIKE 
BRONCO a nuestras órde- 
nes desde el teclado o 
joystick es muy rápida a 
pesar de ello la velocidad 
qon que se mueven sus 
oponentes y la necesi- 
dad de tener que en- 
cararlos para poder 
dispararles hacen 
difícil el pasar con 
333 ^ éxito las pantallas 



Opera-soft presenta "CO- 
SA NOSTRA" en dos for- 
matos: disco de 3,5 pulga- 
das y cinta de cassette, por 
supuesto el tiempo de carga 



del disco es mucho más rá- 
pido y se efectúa "resetean- 
do" el ordenador, mientras 
que el cassette utiliza 
BLOAD "CAS:"R. 



en general los 
efectos sonoros del juego 
ambientan bastante la 
aventura. 

COSA NOSTRA es en 
definitiva un juego basado 
en una ¡dea bastante-origi- 
nal que combina perfecta- 
mente la acción con la vis- 
tosidad gráfica. 
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FUNKY PUNKY es una aventura en 
la que su protagonista sale de su ha- 
bitación para acudir a un examen. Pa- 
ra ello deberá recoger una serie de ob- 
jetos que hay dispersos por las diferen- 
tes habitaciones de la casa y que le son 
necesarios para coger su moto y po- 
der acudir al instituto, sorteando el trá- 
fico, para realizar su examen. 

Podemos dividir éste juego en cua- 
tro partes: la primera transcurre den- 
tro de la casa y en ella podemos con- 
templar una gran variedad de gráficos 
muy vistosos y elaborados, el nivel de 


«PUNKY 


dificultad de ésta fase no es muy ele- 
vado y basta ir encontrando los dife- 
rentes objetos que aumentan nuestra 
energía y esquivando a los enemigos 
para pasar por el laberinto de pantallas 
que forman la casa. Una vez fuera de 
ella y con las llaves de la moto en la 
mano, se pasa a la segunda fase don- 
de hay que ir adelantando los coches 
que vamos alcanzando, ésta etapa es 
bastante difícil de superar y en ella po- 
demos apreciar un desplazamiento o 
scroll rápido y suave, y el movimiento 
de la moto también muy conseguido. 

La tercera fase comienza al llegar al 
instituto; otro laberinto de pantallas si- 
milar al de la casa, donde hay que 
econtrar el aula del examen. Una vez 
en ella, y si llevamos los objetos perti- 
nentes, comienza la cuarta y última fa- 
se: el examen, que consta de 10 difí- 
ciles preguntas a las que hay que res- 
ponder afirmativa o negativamente. 

En general los gráficos están muy 
elaborados aunque no hay una gran 
variedad de enemigos. 

La pantalla del juego presenta un 
simpático dibujo acompañado de una 
melodía alegre y pegadiza. 

La idea de la aventura es muy origi- 
nal aunque utilice el clásico recurso de 
las pantallas en forma de laberinto. 

Como hemos dicho, la melodía ini- 
cial es muy buena y durante el resto 
del juego algunos sonidos van ambien- 
tando ligeramente las distintas situa- 
ciones. 


¡Ahrrrg!, iqué dolor de cabeza!. No 
vuelvo a dar otra fiesta hasta que no pa- 
sen dos meses. ¡Tomé! si hoy tengo un 
examen de evaluación a las 10; y todavía 
aquí... 

Realmente FUNKY PUNKY lo tiene di- 
fícil. Ha de ir al instituto para realizar el 
examen que tiene a las 10 de la mañana. 
Son las 8 y todavia tiene que recoger to- 
das sus cosas revueltas entre los desper- 
dicios de la fiesta que tuvo lugar en su 
apartamento la noche anterior. 

Cuando las reúna, ha de coger su ciclo- 
motor e ir al instituto atravesando las pe- 
ligrosas calles de la ciudad, llenas de con- 
ductores medio dormidos que se dirigen a 
su trabajo. 

Una vez allí, deberá encontrar el aula 
donde se va a realizar el examen y afron- 
tar con toda resignación las diez pregun- 
tas que decidirán su aptitud para superar 
el curso. 

Para realizar el examen será necesario 
que lleve su pluma y la calculadora cien- 
tífica. 

Por supuesto, no ha desayunado y pa- 
ra mantener sus energías a un alto nivel 
deberá tomar los DONUTS y beber los bo- 
tellines que encuentre. Un cigarrillo des-, 
pués de la comida tampoco le sentará 

Los efectos de la resaca harán que vea 
bichos extraños que tendrá que evitar si 
desea continuar sus andanzas. 

Para ver el tiempo que le resta hasta la 
hora del examen, deberá recoger el reloj. 
Y para poder abrir el candado de la moto 
usar su llave. 

queda poco tiempo y el ca- 
el instituto es largo. 
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Como ya sabes, STOP 
BALL son dos juegos en uno, 
el primero es un juego en el 
que la velocidad resulta ser el 
factor principal; debes mante- 
ner en el aire todas las bolas, 
utilizando para ello tu paleta. 
En el segundo juego, has de 
tocar, antes de que se acabe 
el tiempo, todas las pirámides 
de base cuadrada que aparez- 
can en la pantalla, eludiendo 
al mismo tiempo las bolas que 
se arrastran por el suelo. 


CONTADORES 

Son tres y se encuentran 
en la parte derecha de la pan- 
talla. El de más arriba es el re- 
loj de cuenta atrás, el del cen- 
tro el contador de energía y el 
inferior es el marcador. Tu 
energía disminuirá tanto si las 
bolas del primer juego tocan 
el suelo, como si eres tocado 
por las bolas del segundo. 
Nota útil: No debes tocar las 
cruces de las esquinas, ya 
que restan grandes cantida- 
des de energía. 





STOP BALL es un jue- 
go que presenta un 
efecto tridimensional 
muy conseguido: me- 
diante la sombra que de- 
jan las bolas en el suelo 
podemos conocer a qué 
altura se desplazan las 
mismas. 

Los movimientos son 
suaves y rápidos y la 
respuesta de la paleta a 
las instrucciones del 
Joystik o teclado es per- 
fecta. 

Los gráficos, aunque 
en bLanco y negro y no 
muy variados, consi- 
guen bien el objetivo de 
dar una sensación de re- 
lieve tridimensional a los 
objetos que aparecen en 
pantalla. 

A la derecha de la 
imagen se encuentran 
los marcadores en los 
que aparece nuestra 
puntuación en caracté- 
res a tono con el juego. 
La dificultad no es muy 
elevada al principio pero 
va aumentando a lo lar- 
go de las diferentes fa- 
ses del juego. 

Una -agradable melo- 
día ameniza toda la par-, 
tida y además pueden 
apreciarse algunos efec- 
tos sonoros cuando gol- 
peamos las bolas. 

La aventura no es 
muy original pero sí in- 
vita a tratar de superar 
todos los niveles de difi- 
cultad (32) de que se 
compone STOP-BALL. 
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AMORRAD 


Los juegos de ''simu- 
lación" entrañan a la ho- 
ra de programarlos una 
dificultad superior a los 
demás dado que necesi- 
tan ajustarse lo más po- 
sible a la realidad que si- 
mulan, no basta con 
que el juego funcione 
bien y Sea divertido sino 
que además debe pare- 
cer real, y esto implica 
un duro trabajo. 

Fernando Martín Bas- 
ket Master cumple per- 
fectamente todo lo exi- 
gible a un juego de si- 


mulación, todos sus de- 
talles están cuidadosa- 
mente estudiados para 
conseguir un juego exci- 
tante y divertido por su 
"realismo". 

En la pantalla de pre- 
sentación aparece una 
simpática caricatura del 
famoso jugador ligera- 
mente animada y con 
una buena melodía. El 
resto de sonidos del jue- 
go están destinados a 
proporcionarle unos 
adecuados efectos am- 
bientales. Los gráficos 


como ya hemos mencio- 
nado están muy elabo- 
rados y consideran múl- 
tiples posturas de los ju- 
gadores así como la agi- 
tación del público en ca- 
da canasta. 

El nivel de dificultad 
puede ser seleccionado 
por el jugador pudiendo 
enfrentarse a un segun- 
do jugador o bien al or- 
denador que hace las 
veces de Fernando Mar- 




Imagina que, además, tie- 
nes que enfrentarte a Fernan- 
do Martín, a un auténtico nú- 


El baloncesto es el depor 
que mejor conjuga el desarr 
lio físico del ser humano, s 
gún un ordenador especiallz 
do en deportes del Istitu 
Tecnológico de Masachusel 

Fernando Martín Bask 
Master es una prueba clara < 
que también el baionces 
puede desarrollar la ment 


20 Mundo MSX 



CAP 

INTERMITENTE 


LISTADO ENSAMBLADOR 


¡..•AH 1 ¡v í E KM I TENTE 
POR IN IFERUPC IONES 


MUNDO MSX -1987- 
ANGEL GARCIA DELGADO 


C3FAD2 

C30FD3 


2F8 00 
2F9 01 


VEL 1 
VEL.2 

CVEL 


ORG ¡34000 
LOAD 54000 


JF 
DEFB 1 


ACT I VA 
DES ACT 


2FB 3EC3 
2FD 2117D3 
300 DD219FFD 
304 DP7700 
307 DD750.1 
30 A DD7402 


LD 

LD 


A , 0C3H 
HL „ LUCE 
I X , 0FD9FH 

¡ IXH.5 J„ 


310 3EC 
315' FB 


LD (0F D9FH) , A ■ 

El 

REI 

F'USH AF 


Os ofrecemos una rutina que 
mediante interrupciones mantiene 
intermitente el piloto de la tecla 
CAP. 

Para I a creación de la rutina nos 
hemos servido de dos cualidades 
del MSX: 

1 . La existencia de vector de in- 
terrupción en la posición de me- 
moria &HFD9F. 

2. Una rutina de la ROM, que 
nos permita fijar el estado de en- 
cendido o apagado de la luz de 
CAP. 

El restultado, es que con una ru- 
tina que sólo ocupa 77 bytes po- 
demos hacer que la luz de CAP se 
mantenga intermitente mientras 
realizamos otras operaciones. 

Además, nos es posible contro- 
lar el tiempo que debe estar encen- 
dida y el que tiene que transcurrir 
mientras se encuentre apagada. 

Para observar como funciona 
tendrás que introducir el listado en- 
samblador o el cargador BASIC 
que se acompaña. 

En ambos casos graba todo an- 
tes de probarla, .pues si cometes 
algún error, lo más seguro es que 
el sistema "casque". 

Los detalles de rutina son los 
siguientes: 

— Comienza en &HD2F0 y aca- 
ba en la dirección &.HD33C. 

— Su longitud es de 77 bytes. 

— No es relocalizable. Es decir, 
no puede ser cambiada de posi- 
ción dentro de la memoria, a no 
ser que se ensamble cambiando la 
dirección de ORG. 

— Para fijar el tiempo en unida- 
des de 1/50 de segundo, hay que 
POKEar en la posición &HD2F6 un 
valor entre O y 255. Por ejemplo: 
POKE %HD2F6, 50 

Hará que la luz se mantenga en- 
cendida durante un segundo. 
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A, (CVEL) 


— Para determinar la duración 
de la pausa entre destello y deste- 
llo, habrá que hacer lo mismo que 
en el caso anterior, pero en la di- 
rección de memoria a &HD2F7. 
Por ejemplo: 

POKE &HD2F7,25 

hará que la pausa entre destello y 
destello sea de medio segundo. 

— Para activar la interrupción, 
habrá que tener fijadas previamen- 
te las duraciones del destello y la 
pausa. Luego tendrás que hacer: 

POKE &HD2F8,0 

para asegurarse de que empieza 
apagada... 

Y por último hacemos: 

DEFUSR = &HD2F0: A = USR(O) 

para activar las interrupciones. A 
partir de este momento, la lámpa- 
ra permanecerá intermitente. 

— Para desactivar la interrup- 
ción escribe: 


DEFUSR1 = &HD2F3: A = 
USR1 (0) 

y la lámpara dejará de lucir. 

Aunque la luz se esté encen- 
diendo y apagando constantemen- 
te, el estado de las mayúsculas no 
cambia, es decir, si estaba en mi- 
núsculas seguirá en minúsculas, 
aunque el piloto se encienda y 
viceversa. 

Por supuesto, pulsando la tecla 
CAP se cambia el estado pero sin 
afectar al encendido del piloto. 


Análisis de la Rutina 


Como decíamos, disponemos 
de un "gancho" en FD9FH, que 
se utiliza para el control de las in- 
terrupciones generadas en el retor- 
no de barrido de pantalla por el 
VDP. Esta interrupción controla la 
id exploración del teclado y varias 
funciones del sistema operativo. 
Por ello, es necesario, que en el re- 
torno de cualquier rutina que cree- 
mos, se produzca la rutina de lla- 


36 D313 3AF9D2 

37 D31B 3D 

38 D31C B7 

39 B31D 2019 

40 D31F 3AF8D2 

41 D322 EJE 0 1 

42 D324 32F8D2 

43 D327 CD3.201 

44 D32A 3AF6D2 

45 D32D 47 

46 D32E 3AF7D2 

47 D331 32F6D2 

48 D334 78 

49 D335 32F7D2 

50 D338 32F9D2 NO; 

51 D33B F 1 

52 D33C C9 


LD 
DEC A 
CÍE A 
JR NZ , NO 
LD A, ÍPQSI) 
XOR 1 

LD ÍF'OSI) „ A 
CALL 0132H 
LD A, < V ELI ) 
LD B , A 
LD A, ÍVEL2) 
L.D (VEL..1) ,A 
LD A „ B 
LD (VEL.2) , A 
LD (CVEL) ,;A 
POP AF 
RET 
END ' 


LISTADO DE ETIQUETAS ' 


'activa D2Fn CVEL 

D2I-9 

DESACT 

D30F 

' LUCE 

D3 1 7 

NO .0338 POSI 

D2F8 

V EL 1 

D2F6 

. V EL. 2 

D2.F7 
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18 ' 


10 " CAP INTERMITENTE 

30 ' CARBADOR BASIC 
40 ' 

50 RESTORE 9000 
60 8=0 

70 FOR A=S.:HD2F0 TD &HD33C 

80 READ B 

90 S--S+B 

100 POKE A„B 

110 NEXT 

.1.20 IF S< >11179 THE N PRINT "ERROR EN DATA 
S" s END 
1 30 CLS 

140 PRINT "PULSA SPACE PARA GRABARLO" 

150 IF STRIS (0)0-1 THEN 150 
1 60 BS A VE " CAS : CAP I NT " , &HD2F0 , &HD33C 
170 END 

9000 DATA C3 , FA , D2 , C3 , OF , D3 , 05 , 05 ,01 o 3 
,F3,3E,C3,21 , 1 7 , D3 

90 1 O . DATA DD ,21, 9F , FD , DD , 77 , 00 „ DD , 75 , O 1 
, DD , 74 , 02 , FB , C9 , F3 

9020 . DATA 3E , C9 , 32 , 9F , FD , FB , C9 , F5 , 3A , F9 
, D2 , 3.D , B 7 , 20 , 1 9 , 3 A 

9030 DATA F8 , D2 , EE , O 1 , 32 , F8 , D2 , CD , 32 , O 1 
, 3 A , F6 , D2 , 47 , 3A , F7 

9040 DAT A D2 , 32 , F6 , D2 , 78 , 32 , F7 , D? , 52 F9 
, D2 , F 1 , C9 



mada del S.O., en orden a mane- 
jar la interrupción limpiamente. 

El S.O. guarda en la pila todos 
los registros, incluyendo el juego 
alternativo, antes de llamar al gan- 
cho. Por ello podremos utilizar to- 
dos los registros libremente. Exis- 
te una excepción, el sistema ope- 
rativo recoge el contenido del re- 
gistro de estado del VDP y lo si- 
túa en el acumulador, por lo tan- 
to, tendremos que conservar el 
contenido del par AF. 

Para que el gancho apunte a 
nuestra rutina, lo que hacemos es 
incorporar la instrucción de salto 
JP nnnn del Z-80 en los 3 prime- 
ros bytes del gancho, donde nnnn 
es la dirección de comienzo de la ‘ 
rutina. Esta operación la realiza la 
rutina ACTIVA en las líneas 19-27. 

La rutina llamada durante la in- 
terrupción va a ser LUCE, líneas 
35-51. 

Lo primero que hace es guardar 
AF como antes indicábamos. Lue- 
go decrementa el contador parcial 
(CVEL) y se comprueba si es cero. 

Si no lo es se recupera AF y se 
regresa. En el caso afirmativo, se 
cambia el indicador de estado de 
encendido-apagado contenido en 
POSI, y se llama a la rutina de la 
ROM que nos fija este estado en 
el piloto. Esta rutina comienza en 
0132H y acepta un valor conteni- 
do en el acumulador, que si es ce- 
ro apaga el piloto y distinto de ce- 
ro lo enciende. 

La siguiente operación, es inter- 
cambiar los contadores de pausa y 
destello, y cargar el contador par- 
cial con el contenido de Vel2. 

Debido a que estos datos están 
intercambiándose constantemen- 
te, es necesario fijar su valor antes 
' de activar la interrupción, ya que 
en caso contrario no sabríamos 
cual es cual más que mirando el-, 
contenido de POSI, coincidiendo 
cuando este valor fuese cero. 

Una vez hecho esto se recupera 
AF y se regresa de la llamada. 

Para desactivar la rutina, lo que 
deberemos hacer es restaurar la si- 
tuación inicial del gancho, cam- 
biando el primer byte por la ins- 
trucción RET (201). Esto es lo que 
hace la rutina DESACT de las lí- 
neas 23-33. 
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GUSANO GLOTON 


Has de conducir a Toma- 
sín, el gusano glotón, para 
que se coma todos los cara- 
melos de la habitación sin es- 
trellarse contra las paredes ni 
contra sí mismo. 

Para moverlo dispones de 
las teclas del cursor. Gusano 
Glotón es un juego donde la 
acción es un elemento funda- 
mental, y para que exista ac- 
ción hemos de hacer que 
nuestro programa corra a la 
máxima velocidad posible, 
por lo cual se ha simplificado 
al máximo el bucle principal. 

COMENTARIO DEL PRO- 
GRAMA 

1000-1130 Presentación. 
Se apagan los sonidos y se 
ocultan las teclas de función. 
A continuación se fija el mo- 
do gráfico multicolor y se fi- 
jan los colores correspondien- 
tes. En la línea 1060 abrimos 
el canal hacia la pantalla grá- 
fica, esto es necesario para 
imprimir téxto. Imprimimos el 
título, cerramos el fichero, se 
adorna con un par de líneas 
' horizontales y tocamos una 
corta melodía antes de em- 
pezar. 

1140-1340. Entramos ya en 
lo que es el juego. Se acondi- 
ciona la pantalla (esta vez va- 
mps a emplear el S CREEN 1 ), 
se introducen los datos de los 
gráficos directamente en la 
VRAM y les damos color. In- 
mediatamente después se ini- 
cializan las variables de los 
: puntos y las vidas. Se define 

una función que tomando co- 
mo parámetros las coordena- 
das x e y, nos devuelve el có^ 
digo del carácter que ocupa 
esa posición en la pantalla. En 
las líneas 1280-1310 se dibuja 
él escenario. En las líneas si- 
guientes se inicializan las va- 
riables de las coordenadas, la 
de dirección (S ) y el contador 
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ÍOOO * *******#*«■*«•***■** 

■H- * 

* GUSANO GLOTON * 

* * 

1010 * 

1020 * 

1030 * 

1 040 KEYOF'F s BEEP 

1050 SOPEEN 3 s COLOR 15,0,0sCLS 

1060 OREN "GRPs "AS# i 

1070 PSET < 40 , 50) , 1 s COLOR 9 : PR I NT# 1 , " 
GUSANO" 

1 OSO PSET < 40 ,90>,1: COLOR 9 s PR I NT# 1 , " 
GLOTON" 

1090 CLOSE 

1 1 00 L I IME < 0 , 35 > - < 255 , 35 >,11 
1110 LIME <0, 125) -<255, 125) ,, 1 1 
1120 PLAY " V15CDEFGDFECFDFECCC" , " V15Q 
5CDEFGDFECFDFECCC " 

1130 IF PLAY ( 0 ) — 1 THEN 1130 
1140 * PREPARACION ' 

1150 KEYOFF : BEEP 
1160 SCREEN 1,1,0 
1 1 70 COLOR 15,1,1! CL.S 
USO ' GRAFICOS ' 

1 1 90 DATA 60, 1 26 , 255 , 255 , 255 , 255 , 1 26 , 

60 , O , O , 24 , 60 , 60 , 24 , O , O 

1200 RESTORE 1190 

1210 FOR 1080 TO 1095 

1220 READ B 

1230 VPOKE A , B 

1240 NEXT A 

1250 VPOKE 8208, 144: VPOKE 8209,32:VP0 
KE 8216, 160: VPOKE 8217 , 160: VPOKE 8219 
, 160 

1 260 VPOKE 8 1 98 , 208 : VPOKE 8 1 99 , 208 
1 270 P=0 : V— 3 : DEFFNH < X , Y) -VF’EEK <6146+3 
2*X+Y) 


1280 CLS : PR I NT " 




1290 FOR A-f TO 17: PRI NT" | §§§§§§§§§§§ 

§e©@ggg©©g§§g©g§ r ; : next a 

1 300 PR I NT " 


TSio’ LOCATE 25 , 1 ! PR I NTUSI NG " ## " ; V 
1320 X = 1 2 : Y= 1 4 : 3=4 : C=0 


1330 XB=X:YB=Y 
1340 SOUNE) 8,15 



1350 D— STICK (0) 

1 360 IF .0=1 THEN S=1 

1370 IF D-3 THEN S=4 

1380 IF D=5 THEN 3=2 

1390 IF D=7 THEN S=3 

1400 IF 8=1- THEN X=X~1 

14.1.0 IF S=2 THEN X = X + 1 

1420 IF 8=3 THEN Y=Y-.t 

1430 IF 8=4 THEN Y=Y+.1. 

1440 6=FNH < X , Y) 

1450 IF 80136 THEN GDSUB 1510 
1 460 P=P+5 : LOCATE 9,1; PR I NTUS I NG " #### 
# " ¡¡ P 

1470 C=C+1 : IF 0458 THEN FOR A=1T03:S 
0UND8 ,15; F0RB=0T0255 ; SOIJNDO , B : NEXTB ; S 
0UND8 , O: NEXTAs P=P+50: GOTO 1280 
1480 SOLJND 8, 12; FOR A=90T0 250 STEP20 
: SOUND O , As NEXT A;SOUND 8,0 
1490 LOCATE Y,X:PRl'NT"g" 

1500 GOTO 1350 

1510 FOR A= 1 5 TO O STEP -1 

1520 VPOKE 8208, 16* As SOUND 8, 15; FOR B 

“■250 TO O STEP -6 ¡SOUND O, B: NEXT B;SO 

IJND 8 , O ; NEXT As VPOKE 8208 ,144 

1530 V=V~ 1 : I F V<0 THEN RETURN 1560 

1 540 LOCATE 25,1; PR I NTUS I NG " ## 11 ¡¡ V 

1550 RETURN 1280 

1560 BEEP 

1570 PL A Y "VI 504CD03B04E2R4 " , " V 1 504FF 
DG2R4" , " V 1 504GAG05C2R4 " 


1580 IF PLAY <0) =-l THEN 
1590 COLOR 7 : CLS 
1600 PR I NT ; PR I NT 11 



1580 




■ U 


! B iI 


r 1 1 1 


8219, 208 ; VP0KES2 1 7 , 208 


1 630 LOCATE O ,16; A$= " PUNTOS : " +STR$ < p ) 
; GOSUB 1700 

1640 A$= " OTRA PARTIDA <S/N)"s GOSUB 17 


00 

1 650 A$= I NKEY$ 

1660 IF A$="S" OR A$="s" THEN RUN 
1670 IF A$="n" OR A:f= ,, N" THEN SCREEN 
O; FOR A=1 TO 50; A$=INKEY$; NEXT A : END 
1 630 V= 16# (2+ 1 NT < RND « 1 ) * 1 3 ) ) ; VPOKE 32 
1 9, V: VPOKE 82.17, V; FOR A=1 TOSO: NEXT A 
1690 GOTO 1650 

1 700 PR I NTTAB í 1 5--LEN ( A$ > /2 ) ; A$ ; PR I NT : 
PRI NT ¡RETURN 


de "caramelos” cogidos. 

Por último, antes de pasar 
al bucle principal, se pone el 
volumen del canal A a 15. 

1350-1500 Bucle principal. 
Se lee el teclado y se guarda 
en S la nueva dirección. Lue- 
go en las líneas 1400-1430 en 
función del valor de S se in- 
crementan las coordenadas. 

Antes de imprimir toma- 
mos el carácter de la pantalla, 
y en caso de no ser el 136 
(nuestro caramelo), se salta a 
la línea 1510 donde se rstará 
una vida. En el caso contra- 
rio, se suman 5 puntos y se 
imprime el marcador, se in- 
crementa el número de cara- 
melos cogidos y se comprue- 
ba si se han reunido ya todos. 
De ser así, hace un sonido, se 
suman 50 puntos y se empie- 
za de nuevo. 

Si no se ha llegado al final, 
se hace un sonido, se impri- 
me nuestro gusano y se repi- 
te el bucle. 

1510-1550. Rutina de pérdi- 
da de vida. Se cambia el co- 
lor de nuestro gusano, cam- 
biando en la VRAM el byte 
que define el color que debe 
tomar ese carácter en panta- 
lla. Se comprueba si no tene- 
mos vida, si es cero se salta 
al final. Si no comenzamos de 
nuevo. 

1570-1700. Game Over. Se 
ejecuta una melodía, dibuja 
en pantalla GAME OVER y los 
puntos. Se lee el teclado y al 
pulsar "S" salta al principio. 
Si pulsamos "N" se sale del 
programa. En la línea 1700 es- 
tá la subrutina que imprime 
centrados los mensajes de és- 
ta pantalla. 
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PUENTES 


Este programa te ayu- 
dará a mantener en for- 
ma tus reflejos ya que 
tendrás que evitar que 
ningún coche de los que 
transita por la autopista 
Choque contra el puente 
móvil que tu manejas, 
indicando cual es la vía 
transitable 1,2 ó 3 se- 
gún el número que pul- 
ses. 


Entre las líneas 1000 y 
1210 se encuentra la 
pantalla de presentación 
realizada en SCREEN-3 
y en la que podemos 
apreciar el rótulo 
“PUENTES" y una me- 
lodía (línea 1200). 

A partir de la línea 
1230 empieza a definirse 
la pantalla del juego co- 
locándola en SCREEN-1 
y dando color (líneas 
1260-1280) a los bloques 
gráficos que compon- 
drán el paisaje que se di- 



buja entre las líneas 
1300 y 1360. 

La línea 1370 desvía el 
programa a la subrutina 
que genera los SPRITES 
(líneas 2360-2420). 


.1.000 ' #*** PUENTES 
1010 ' 

1020 ' 

1030 ' 

1040 ' 

1050 KEYOFF 
1060 BEEP 
1070 SOPEEN 3,1,0 
.1.080 COLOR 15,1,1 
1090 CLS 

1100 OPEN “GRP: " AS# 1 

1110 L. I NE ( 0 , 1 20 ) - < .256 , 60 > , 4 , BF 

1 1 20 PRESET < 39 , 78 ) , 4 

1 1 30 PR I NT# 1 , " PUENTE " 

1140 PRESET (35,78) ,4 
1150 COLOR 1 
1 1 60 PR I NT# 1 , " PUENTE " 

1 1 70 L I NE ( 0 , 60 ) ■- ( 256 , 60 ) , 7 
1 1 SO L I NE ( 0 , 1 20 ) •- ( 256 ,120 ,7 
1190 COLOR 15 

1200 PLAY " V 1 5T230GFEDFGEDBAGDFEBCGDF' 
EBDGEFDCCC 11 
1.210 CL.OSE 

1220 IF PLAY <0> =— 1 THEN 1220 
1230 SCREEN .1,2,0 
1240 COLOR 1,1.2,12 
1250 CLS 

1260 VPOKE 8219,112 
1270 VPOKE 8218,17 
1280 VPOKE 8216,225 
1290 FOR A=1 TO 3 
1300 PRINT" 


1310 NEXT A 
1320 FOR A=0 TO 19 
1330 LOCATE 11, A 
1 340 PR I NT " 

1350 NEXT A “ ■ 

1360 PRINT" XWWWWWWY XWWWWW 

WY V PUNTOS V VFAL.LOSV V O 

000 V V 0000 V ZWWWWWWL 

ZWWWWWWC " ; 

1370 GOSUB 2360 
1380 F-0 
1390. F=0 

1 400 DEFFNP-T < P ) «¡R I GHTT ( " 0000 " +M I Dí ( ST 
R$ (P) ,2,4) ,4) 


26 Mundo MSX 




1440 
1 450 
1460 
1470 
1 480 
1490 




1 560 
1570 
OSUB 


1590 IF Y2<0 THEN GOSUB : 
1 600 PUTSF'R I TE 1 , < Y2 , 23+41 
1610 IF Y 2 >88 AND Y 2< .1 68AW1 
OSUB 1890 
1620 BOTO 1500 
1630 E=2+6*S 

1 640 LOCATE 1 0 , E s PR I NT " -H 
1650 LOCATE 10 ,E+1 s PRINT 1 
1660 LOCATE 10 , E+2 j PRINT 1 
1670 LOCATE 10,E+3: PRINT 1 
1680 RETURN 
1690 E --2+6*8 

1700 LOCATE 10, Es PRINT" f- 
1710 LOCATE 1 0, ,E+1 SPRINT 1 
1720 LOCATE 10, E+2 SPRINT 
1730 LOCATE 1 O, E+3 sPRINT 
1740 RETURN 
1750 Y 1=0 

1 760 MI = I NT ( RND (1 ) *3 > 

1 770 C 1 =2+ I NT ( RND (1 ) * 1 3 ) 
1-780 GOTO 1950 
1790 GOSUB 2040 
1 800 PIJTSPR I TEO ,,9,1 
1810 ñl=S 

1820 FOR A=1 TO 200 
1830 NEXT A 
1840 GOTO 1990 
1850 Y2--256 
1 860 M2= I NT ( RND ( 1 ) *3 ) 

1 870 C2=2+ 1 NT < RND < 1 ) * 1 3 ) 
1880 GOTO 1950 
1890 GOSUB 2040 
1 900 PIJTSPR I TE 1 , , 9 , 1 
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Y 1=0 
C 1 =6 
M2= 1 
Y2=130 
C2=4 

A=RND < ~T I ME ) 

A*=INKEY* 

IF B>0 AND A$=" 1 " THEN GOSUB 163 
Os GOSUB- 1690 

IF SOI AND A$="2" TI-iEN GOSUB 16 
=1: GOSUB 1690 

IF S<2 AND A$= " 3 " THEN GOSUB 163 
2 s GOSUB 1690 
Yl-Yl+4 

IF Y 1 >256 THEN GOSUB 1750 
PUTSF'R I TEO , < Y 1 , 23+43*M 1 ) , C 1 , 0 
IF Y .1 >88AND Y 1 < 1 68ANDM 1 < >S THEN G 
1 790 
Y2=Y2-4 

IF Y2<0 THEN GOSUB 1850 
PUTSF'R I TE 1 , <Y2,23+48*M2) ,C2,0 
IF Y 2 > 8 8 A N D Y 2 < .1 6 8 A N D M 2 < > S THEN G 
1 890 

GOTO 1.500 





Entre las líneas 1380 y 
la 1490 se inicializan las 
variables y contadores, 
dibujándose el primer 
puente partiendo de una 
subruíina llamada desde 
la línea 1420 y que acu- 
de a las líneas 
1590-1740. 

Entre las líneas 1 540 y 
. 1620 tenemos el movi- 
miento de los automóvi- 
les y el retorno al son- 
; deo de teclas (línea 
1620), así como las sali- 
das a las subrutinas que 
incrementan los puntos 
o los fallos, en cada uno 
de los dos coches qeu 
puede haber en pantalla 
! al mismo tiempo. 

Entre las líneas 1950 y 
1980 se encuentra la su- 
brutina que incrementa 
los puntos. 

A partir de la línea 
1990 y hasta la 2030 te- 
nemos el contador de 
fallos. 

Entre las líneas 2040 y 
2100 está la subrutina 
que genera el sonido de 
explosión. 

A partir de la línea 
2110 comienza la rutina 
de fin de programa con 
el marcador final y la op- 
ción de volver a jugar, 
esta rutina termina en la 
línea 2350. 



1910 M2=S 

1920 FOR A- 1 TO 200 
1930 NEXT A 
1940 GOTO 1990 
1950 P--P+5 
1960 LOCATE 4,22 
1970 PR I NTFNPT <P) 

1980 RETURN 
1990 F=F+1 
2000 LOCATE 22,22 
2010 PR I NTFNP-t" ( F ) 

2020 IF F>9 THEN RETURN 2110 

2030 RETURN 

2040 SOUND 6,21 

2050 SOUND 7,247 

2060 SOUND 8,16 

2070 SOUND 11,100 

2080 SOUND 12,60 

2090 SOUND 13,0 

2100 RETURN 

2110 BEEP 

2120 PLAY " V 1 5T200BBBE< AGFEDCCCC " 

2130 SCREEN 1 
2140 LOCATE 0,5 

2150 A$~ 11 GAME OVER"! GOSUB 2300 
2160 LOCATE 0,11 
2 1 70 A$— " PUNTOS ; " +FNPÍ ( P ) 

2180 GOSUB 2300 

2190 A$~" OTRA PARTIDA <S/N) " 

2200 GOSUB 2300 
2210 FOR A=1 TO 50 
2220 AT= I NKEYT 
2230 NEXT A 
2240 POKE 8<HFCAB,255 
2250 A$= I NKE Y$ 

2260 IF A$="S" THEN RUN 

2270 IF A$="N" THEN SCREEN OsEND 

2280 GOTO 2250 

2290 LOCATE 0,0 

2300 PR I NTTAB < 1 5-L.EN < A$ ) /2) ; A-T 

2310 PR I NT 

2320 PRINT 

2330 PRINT 

2340 RETURN 

2350 END ■ 

2360 DAT A 0 , 0 , 0 , 1 C , 7F , F4 , F3 , F3 , F3 , F3 , 
F4 , 7F , 1 C , O , O , O , O , O „ O , 38 , FE , 2F , CF , CF , C 
F , CF , 2F , FE , 38 , O , O , O , 8 , O , O , 24 , O ,8,3,23 
,B, 1 ,83, 12, 10,84,0, 10 , O , 82 , O , 88 , O , AO , 
4 , EO , CO , C9 , EO ,80,8,42, O , 90 
2370 RESTORE 2360 
2380 FOR A= 14336 TO 14399 
2390 READ B$ 

2400 VPÜKE A , VAL < 11 8<H." +B$ ) 

2410 NEXT A 
2420 RETURN 
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Con este sencillo juego 
podéis poner a prueba 
vuestra puntería, se trata 
de introducir una bola en 
la boca del pájaro de un 
reloj de cuco cuando és- 
te la tenga abierta: 
EXPLICACION DEL LIS- 
TADO 

Entre las líneas 1000 y 
1210 tenemos la pantalla 
de presentación realizada 
en el modo gráfico 
SCREEN 3, en la que po- 
demos apreiar el rótulo 
"CUCO" y una pequeña 
melodía inicial. 

Entre las líneas 1220 y 
1270 comienza el juego 
en sí, colocando la pan- 
talla en el modo gráfico 
SCREEN 2 e inicializando 
algunas variables así co- 
mo poniendo a ceros el 
marcador (línea 1270). 

La línea 1280 llama a 
una subrutina que co- 
mienza en la línea 1770 y 
concluye en la 1870. Es- 
ta subrutina es la encar- 
gada de dibujar el paisaje 
y puede ser modificada a 
vuestro gusto. 

La línea 1290 desvía el 
programa hacia la subru- 
tina que se encarga de 


definir la forma de los 
sprites y que se encuen- 
tra entre las líneas 2120 y 
2190. 

Las líneas 1300 y 1310 
inicializan la variable "M" 
y bifurcan a las líneas 
1730-1760 donde se en- 
cuentra una subrutina 
que de modo aleatorio se 
encarga de, según el va- 
lor de "M", colocar al pá- 
jaro con la boca abierta o 
cerrada. 



La línea 1330 sondea si 
se ha pulsado la barra es- 
padadora. En caso nega- 
tivo la línea 1340 hace 
que el programa conti- 
núe esperando a que se 
produzca dicha pulsa- 
ción. 

A partir de la línea 1350 
comienza una rutina que, 
una vez ha sido pulsada 
la barra espaciadora, 
desplaza la bola hasta el 
pájaro. 

La línea 1420 comprue- 
ba si éste tiene la boca 




abierta, en cuyo caso ha- 
ce saltar el programa a la 
línea 1520. 

Las' líneas 1430 hasta la 
1510 entran en acción 
cuando la bola golpea el 
pico cerrado de nuestro 
cuco haciéndola caer al 
suelo. 

Entre las líneas 1520 a 
la 1680 se encuentra la 
rutina de "aciertos" que 
entra en juego cada vez 
que introducimos una 


bola en la boca del cuco. 

Las líneas entre la 1690 
y la 1720 hacen una pau- 
sa y una posterior com- 
probación del número de 
fallos, que en caso de ser 
mayor que cuatro, la lí- 
nea 1710 desviaría el pro- 
grama a la línea 1880 a 
partir de la cual y hasta la 
2110 se encuentran los 
mensajes de fin de parti- 
da y la opción de volver 
a jugar. 


1000 * *** cuco *** 

1010 • 

1020 * 

1030 * 

1040 * 

1050 KEYOFF 
1060 BEEP 
1070 SCREEN 3 ,'2, O 
1080 COLOR 1,15,15 
1090 CLS 

1 1 00 OREN ” SRP s " AS# 1 

1110 LINE (50,50)— (210,150) , 1 , BF 

1 1 20 PRESET ( 76 , 86 ) , 1 

1130 COLOR 7 

1140 PRINTttl , "CUCO" 

1150 PRESET (72, 86) , 1 

1160 COLOR 4 

1170 PRINT#1 , “CUCO" 

1180 LINE (50, 50) -(210, 150) ,6, B 
1190 CL.OSE 

1200 PLAY " VI 5EDCDEFFDBEFCBAGCFDBESCC 
CC" 

1210 IF PLAY (O) =— 1 THEN 1210 

1220 SCREEN 1,2,0 

1230 COLOR 1,15,15 

1240 CLS 

1250 P=0 

1260 F=0 

1270 DEFFNP* (P)=RI6HT# ( "000O“+MID$ (ST- 
R$(P) ,2,4) ,4) 
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1280 GOSUB 1770 

1290 GOSUB 2120 

1300 M=i 

1310 GOSUB 1730 

1320 PUTSPRITE 1 , <52,72) , 13,2 

1330 IF SJRIG <0) =— 1 THEN GOTO 1350 

1340 GOTO 1310 

1350 SOUND 8,15 

1360 SOUND 1,0 

1370 FOR A=52 TO 190 

1380 SOUND O , 1 90— A 

1 390 PUTSPR I TE 1 , ( A , 72 ) , 1 3 , 2 

1400 NEXT A 

1410 SOUND 8,0 

1420 IF M=2 THEN 1520 

1430 SOUND 8,15 

1440 FOR A=72 TO 167 

1450 SOUND O, A 

1460 PUTSPR I TE 1 , < 1 90 , A ) , 1 3 , 2 
1470 NEXT A 
1480 SOUND 8,0 
1490 F=F+1 

1 500 LOCATE 18,2: PRI NTFNPT < F ) 

1510 GOTO 1690 

1520 SOUND 8,15 

1530 FOR A=190 TO 198 

1540 SOUND 0,255- (A- 189) *20 

1 550 PUTSPR I TE 1 , < A , 72 ) , 1 3 , 2 

1560 FOR B-l TO 30 

1570 NEXT B 

1580 NEXT A 

1590 SOUND a, O 

1600 FOR A-l TO 9 

1610 M=3--M 

1620 GOSUB 1740 

1630 FOR B=1 TO 100 

1640 NEXT B 

1650 NEXT A 

1660 P=P+5 

1670 LOCATE 7,2 

1680 F'RINTFNF'i <P) 

1690 FOR A=1 TO 1000 
1700 NEXT A 
1710 IF F!; : 4 THEN 1880 
1720 GOTO 1300 

1730 IF RND ( 1 ) >„ 9 THEN M— 3— tí: SOUND 9, 
15: SOUND 9,0 

1740 IF M= 1 THEN PUTSPRITEO , < i 92 , 73) , 
5,0 


1750 IF M~2 THEN PUTSPRITEO, < 19 
5,1 

1760 RETURN 
1770 CI..S 


1780 PRI NT" 

oooJF. 

1 790 PRi^rn nmTiiimii i 
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1800 PRI NT" 
•O 0 


0 


í+o 

1810 Pl 
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H ! Jl 


■■ - -w 

HHHH TT ®p' ^ ° W T 
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1810 PRINT" t-t-HHHI 0 M 

t«hh, ^ 1 i“ J 1 V 

|| J J J V -pj-HHHH 

„ i i 1 S ttí i 1 

I „ , TTITT'ITTTn'TT'rTTn'TTrrr 

Tí 2 o VPOK'E 8218,104 
1830 VF'OKE 8217,166 
1840 VF'OKE 8193,195 


1850 VF'OKE 8219,64 
1860 LOCATE 0,0 
1870 RETURN 

1880 F'LAY "VI 5T200BBBBAGFEDCCCC " 
1890 IF PLAY (O) =— 1 THEN 1890 
1900 SCREEN 1 
1910 LOCATE 0,5 


1920 Ai— "G AME OVER" 


1930 GOSUB 2070 

1940 LOCATE 0,10 

1950 Aí 1 - "PUNTOS: "+FNPÍ(P) 

1960 GOSUB 2070 

1970 Aí= " OTRA PARTIDA <S/N)" 

1980 GOSUB 2070 

1990 FOR A= .1. TO 50 

2000 AT=INKEY-1- 

2010 NEXT A 

2020 POKE &HFCAB , 255 

2030 Ai= I NKEYT 

2040 IF At---"S" THEN RUN 

2050 IF AT- " N " THEN SCREEN O: END 

2060 GOTO 2030 

2070 PRINTTAB <15-1 EN <Aí ) /2) ; Ai 

2080 PRINT 

2090 PRINT 

2100 PRINT 

2110 RETURN 

2120 DATA O , O . O , 3 , 7 , 3 , O , O , O , O , O , O , 

, O , O , C , 38 , 78 , BO , FC , FE , DF , IF , 3F , 3F , 
•IF , IF ,F , C , IF, O , O , 6 , 3, 1 , O , 1 , 6, O , O , O 
O , O , O , O , C , 38 , 78 , BO , FC , FE , DF , 1 F , 3F , 
3F , 1 F , 1 F , F , C , 1 F 

2 1 30 DAT A O , O , 0 ,0,1 0 , 3E , 3E ,10,0,0,. 
, O , O , O , O , O , O , O , O , O , O , O , O , O , O , O , O , O 


O , O 

2140 RESTORF 7120 

2150 FOR A— 14336 TO 14431 

2160 REAI) B* 

2170 VF'OKE A , VAL ( " ?-H " +B$ > 
2180 NEXT A 
2190 RETURN 


30 Mundo MSX 





Eres un famoso piloto de RALLY y lias 
sido el/efteái-dádd 'dalprobar el -nuevo LO- 
TUS 435-S22-Tiirbo-inyecc¡ón. 
p #: circuito, de ; : |!ipuebas : es unaL§ÍP¡uosa 5 
iidaiusterá. donde, eiTmásde una curva, tu 
fpDfente'.G^ a 

i Los controles -dej. vehículo. están : a -car- 
go de ios cursores de. tu teclado: aS 

GURSOR IZQUIERDA;- Gira el vofentej 

CURSOR DER.É'6pA.- GjrabeRvplarii-e 
a la' derecha. . 


1170 LINE <0,,50) - <256,60) ,6,BF 
USO LINE <0, 130) -<256, 140) ,6, BF 
1190 F’LAY " V 1 5CEDGFEDFEBGFEDCCCV 1 0CV5 
C" , "VI 503CEDGFEDFEBGFEDCCCV 1 4CV 1 3CV 1 2 
CV10CVSCV5C" 

1200 IF PLAY (O) =— 1 THEN 1200 

1210 GLOSE 

1220 A=RND<-TIME) 

1230 V=RND ( 1 ) / 10 
1240 0=13.94 
1250 D=3 
1260 IS=0 
1270 S=144 

1280 DEFFNG=VPEEK (6304+INT (S/8) ) 

1290 DEFFNH=VPEEK <6305+1 NT (S/8) ) 

1300 SCREEN 1,2,0 
1310 COLOR 1,2,2 

» ™nfxí°a to 22! PRmrrm m>l " « 

1340 SOUND 4,24 

1350 SOUND 6,32 

1360 SOUND 7,3 

1370 SOUND 8,2 

1380 SOUND 9,2 

1390 SOLJND 10,16 

1400 SOUND 11,58 

1410 SOUND 12,0 

1420 SOUND 13,1 4 

1430 FOR A=— 20 TO 32 

1440 SOUND 11, 90--A 

1 450 PLJT SPR I TE 1 , < 1 4 1 , A ) , 6 , O 

1460 FOR B=1 TO 75 

1470 NEXT B 

1480 NEXT A 

1490 T I ME=0 

1500 IF D=1 THEN C=C+V 
1510 IF D=2 THEN C=C-V 
1 520 I F RND < 1 ) > . 97 THEN D= 1 + 1 NT < RND < 1 
) +3 ) : V=RND<1) /6 

1 530 LOCATE 1 1 +3*C05 (0,23: PR I NT " 


COMENTARIO DEL PROGRAMA 

■ } É-n; éátf, programa' serba; 'ájiipvp elitado ; 
LfflnsCj^ .lyl'SX 

; al'« para i-epro-. 

; düdr^^^ 

Tipilels’j pCie ;sérá dést''uidO'ei'i caso de' co- 
Siis'iS a'/c r njt^sVtJc la'" 

T003R.210. Rresé'trtación.- Ha sido reali- 
/ ?a’áá;' : én -SCREEiN; 3 V (Mpcib- t^TuifiépIpr) , 

! js airar>fra 

pa- 

. ||ja|ail|'jgr3Tica. Reeuarv 


1 0 1 0 ' 

1020 ' 

1030 ' 

1040 ' 

1050 KEYOFF 
1060 BEEP 
1070 SCREEN 3 
1080 COLOR 15,1,1 
1090 CLS 

1100 OPEN "GRP; "AS#1 
1110 PRESET (36,80) 
1120 COLOR 7 
1 1 30 PR I NT# 1 , " DR I VER 
1 1 40 PRESET ( 32 , 80 ) 
1150 COLOR 4 
1 1 60 PR I NT# 1 , " DR I VER 


THEN I S= I : 
THEN I S= I : 
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List 


dramos I Mmb co’ri;.2 UNEs.y focarnos . 
una breye.;fndlo'día, retenida ;ppt la fyn-- . 
' cióri P LA Y: de ia,' lírieá'S 200 hasta que sea . 
ejecutada ; totalmente., 'mbir\eiíi§:'' eri el 
cual cerramos el f iclnero. .Que i tábíapno 3 
abierto (realmente’ se cierran' todos dos 
dar paso al . 

1220-1490. Iniclalización. En 'este.‘. . I 
ampllbrbrb^elb'e .realizan lás sigüi^teis/.v 
operaciones: ■. 

V. 'Fijar el R!\!D con un inicio aleatorio. , 

■ ■ _!_■ Se ¡niqlalizan las variables. • 
í — Se definen. :dóS’ funciones que de- ¡ 
vuelvan el carácter de ia pantalla sobre el: ., 
que se sitúa nuéstVo boche. 

— Se .Pija el MQQ(¿|de texto., efe; 32 co- 
lumnas, cor, Sprites de 16x16 y sin CLIC 
.en el teclado. . 

Se dan los colores 'correspondien- 
tes a! papel, borde y tinta. 

.r.ietás-jfrecto). 

Seidefinen.lós. Sprites. • 

— Se baja si coche desde el exterior. 

donde ’per- 

• híanbcefá. ■ É 

. — Se p_o.n4 fef tieniap'b- a cero, j 
■ 1 500-161 0. ..Bucle del .juego. Rrirne.ro se 
niueveJá .carretera,, se ¡mip.iMe'|aüúlt¡ma '■ = 

■ .lipeán A. continuación, se iee el teclado; y 
para mover : nuesti;ó| coche. Se sitúa Ííelfí|i 
sprite y; se Góp|áifeeba ; si ehocaíahálizan- 
do losjvalóres cjue 'devuelven las^sTum: 
■cio.ines’ áh teapf eh^dnadás : : . y i 
1620-1890. Rutina, de fchpiijté'. Se rea- 
'.explosión y se. Imprime 
el elásÍGo;.mensaje;.de.’:GAME OVER. El . 
POIxE ele la Mh&O activadlas yrna-.v:-' 
yúscui^/;') 

19GQ-T980. Súbrutif, ia|que. mete los. da- . 

. los délos 1 spriies; en la. VRAM. ¡ ; ; 

, 1990:2020. Subrmina : que Imprime ej.' : 
■■téxto cent ráelo. 



1600 IF FN60219 OR FNH0219 THEN BÜT 
O 1620 

1610 BOTO 1500 

1620 BEEP 

1630 SOUND 6,21 

1640 SOUND 7,247 

1650 SOUND 8,16 

1660 SOUND 11,100 

1670 SOUND 12,60 

1680 SOUND 13,0 

1690 FOR A=1 TO 5 

1 700 PIJTSPR I TEO , < S-3 , 32 ) , 1 5 , A 

1710 FOR B--1 T0200 

1720 NEXT B 

1730 NEXT A 

1740 SCREEN lsP=TIME 

1750 SCREEN 1 

1760 COLOR 7,1,1 

1770 LOCATE 0,6 

1780 A$="GAME OVER" 

1790 BOSLIB 1990 

1800 LOCATE 0,12 

1 8 1 0 Aí- " PUNTOS s " +STR-Í < P ) 

1820 GOSUB 1990 

1830 Ai'- " OTRA PARTIDA (S/N) " 

1840 GOSUB 1990 
1850 POKE SíHFCAB , 255 
1860 Aí-INKEY# 

1870 IF A*="S" THEN RUN 

.1880 IF A$="N" THEN FOR A=1 TO 50 : AT~ 

INKEYís NEXT As SCREEN OsEND 

1890 GOTO 1860 

1900 DATA 7,F,1C,1B,1F,1B,E(,F,B,A,1C, 

1 F , 1 F , F , 9 , 7 , EO , FO , 38 , D3 , FS , DS , DO , FO „ D 
O , 50 , 38 , F8 , F8 , FO , 90 , EO , O ,81,1 1 ,29,18, 

1 7 , 4B , D , F7 , 3A , 2D , SF , 1 B , 1 E , 34 , 38 , 20 , 82 
, 80 , 4E , DC , F8 , F2 , EO , F8 , DE , FF , FO , 78 , 39 , 
28, 9C 

1 910 DAT A O , 20 ,2,10,5, O , 52 , 8,1, 20 ,5,1 
0,4,0,12,0, O , 40 , 1 O , O , 40 , A , 20 , 40 ,8,0,4 
4,0, 90 , 2 , 40 ,10, 0 , 0 , 40 , 2 , O , 1 0 , 2 , 0 , 40 , 4 
,0,2,1 O , O , 1 , O , O , 2 , 20 , O , Ó , 48 , O , O ,9,0,4 
, 40 ,0,1 O , O , 4 

1 920 DATA 1,0, O , 2 , 80 , O , O , O , O , 20 , O , O , O 
,0,1,1 0 , 0 , 0 , 22 , 0 , 0 , 0 ,8 „ O , 1 .„ O , O , O , 4 ' O ’ 
0,8 

1930 RESTORE 1900 

1940 FOR A- 14336 TO 14495 

1950 READ B-f 

1960 VF'OKE A , VAL < " ?<H " -I-BT ) 

1970 NEXT A 
1980 RETURN 

1 990 PR I NTTAB < 1 5--LEN < A* ) /2> ; A* 

2000 F'RINT 
2010 F'RINT 
2020 RETURN 
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LENGUAJE 
MAQUINA PARA 
MSX 

Autor: Joe Pritchard 
Editorial: Anaya Multimedia 
El objetivo de este libro es do- 
tar al usuario de MSX de un ma- 
nual de programación del Z-80 
para que pueda escribir rutinas 
que hagan uso de varios compo- 
nentes del ‘sistema. Es un libro in- 
teresante para todos aquellos qué 
quieran saber como aplicar sus 
actuales conocimientos de pro- 
gramación del Z-80 al ordenador 
MSX en: este lenguaje. 

Algunos de los temas que tra- 

Códlgo máquina frente al Ba- 
sic. Los registros en la práctica. 
Cálculos con 8, bits. Transferen- 
cia de datos de 16 bits. Bucles, 
saltos y operaciones con bloques. 
Ilustraciones de entrada y salida. 
E| VDP. El PSG. 


JERGA 
INFORMATICA 


Glosario de 
Términos 


® Página de memoria. Fragmento de memoria de 16 kbytes Co- 
mo el Z 80 sólo puede direccionar 64 kb de memoria, para acceder a 
más memoria, ba de hacerlo cambiando de página. 

° Octeto de memoria. Expresión equivalente en castellano a la 
palabra inglesa "byte". Es un conjunto de 8 bits. 

° Memoria de video. RAM de 16 k que posee el microprocesa- 
dor de video. Su organización varía según el modo de pantalla. 

® Machacar. Expresión utilizada para describir cuándo una zona 
de memoria crece e invade otra zona alterando su contenido. 

° Ensamblador. Programa mediante el cual a partir de un lista- 
do fuente (listado ensamblador), genera un código objeto, común- 
mente llamado código máquina. 

° CHECKSUM, (Suma de chequeo). Operación mediante la cual 
es posible comprobar si un conjunto de datos han sido introducidos 
correctamente (por ejemplo al copiar un listado), comprobando si 
coincide la suma de los datos originales, con la de los datos copiados. 

® BUFFEñ. Zona de memoria, normalmente de corta longitud, 
que se utiliza para almacenar temporalmente los datos en operacio- 
nes de transferencia. 

° POKEar. Introducir un dato en una posición de memoria con 
el empleo de la instrucción POKE. 

° Llamar a una rutina. En lenguaje ensamblador equivale a 



CALL dirección de comienzo de la rutina y en BASIC seria: primeros bytes del gancho. 


DEFUSR = dirección de comienzo en la rutina: A = USR (0) 

° PPJ 8255. (Interfaz programable de periféricos INTEL 8255). 
Circuito de E/S muy potente, que en los MSX controla el teclado, la 
lámpara de mayúsculas, las funciones del cassette, la selección de pá- 
ginas de memoria, y un puerto de sonido de 1 bit, 

0 Ranura, Banco de memoria de 64 kb, que puede funcionar co- 
mo ROM, como RAM, como conexión de cartucho o como bus de 
expansión. 

e Bus de expansión, Conector desde el cual se acceden a las 
funciones del microprocesador. Se usa por ello para conectar pe- 
riféricos. 

° Cascar. Se dice que el sistema "casca", cuando al producirse 1 
un error de cualquier tipo, el sistema operativo pierde el control de 
sus funciones. 

° Gancho. Conjunto de 5 bytes de RAM inicializados para con- 
tener la instrucción RET del z-80 (C9H). Nos permiten redirigir las lla- 
madas (CALL) insertando una instrucción JP nnnn de Z-80, en los 3 


FE DE ERRATA 


CARGADOR KEO.PS 

En el número anterior publicábamos el programa Keops 
sin el programa cargador. Esperamos que nos disculpéis es- 
te lamentable error. Y a continuación os ofrecemos el cita- 
do programa, recordándoos que hay que teclearlo antes del 
programa principal y grabarlo en cinta con: SAVE 
"CASrKEOPS". 


10 SCREEW i o KEYOFF 5 W I DTH 29 s COLOR 2,0,Qo 
LOCATE 7,9§ PR I NT " CARGANDO 8 KEGPS“ 

20 RESTORE 9000 o D=5@O0®! 

30 READ ASbFOR A=i TO 63 STEP 2 
40 B$="S<H“+MID$<A$ 9 A,2)» 

50 POKE D , VAL < ) b D=D+ 1 s I F D >5846 i ! TTIK2SM 
BSAVE "CASsC/M" ,500009 ,58461 ! s BOTO 70 
60 NEXTsQOTO 30 
70 BLOAD •■CAS!" ,R 

9000 DATA OiOOOSl 1 00382 19DE2CD5C00G9030 
7050703656E3F fl 7030303020E 2EOOCOEOAOEO 


9010 DATA COAG70F8EEA6COC04040707803070 
50703C50E 1 F7765030302020E 1 ECOEOAOEOCO 
9020 DATA A676FCE8AOCOCO4O7O70OOOOOOOOO 
0000000703F70000000000000000000000000 
9030 DATA OO7OFC7OOOOOOOOO0OOOOOOOOOOOO 
OOOOOOE3FOEOOOOOOOOOOOOOOOOOOOOOOOOOO 
9040 DATA OEFCOEOOOOOOOOOOOOÍ 8494527 3EF 
F7 fl 35F i 7F5FF3 1 F2E4509902224E8FBFC8AAF 
9050 DATA 8EFBAAFC8AF24B40094424 1 7DF3F5 
1 F57 i DF553F5 í 4F 1 202 1 892A2E47CFF8EAA8F 
9060 DATA FEFACFF874A290040201 1F3161677 
57F7F7838 i EO 1 0DOC204080F88C86E6AEFEFE 
9070 DATA 1E1C7B80B030000E0Í '1F316167757 
F7F7838 1FOCODO 1 007080F88C86E6AEFEFE1E 
9000 DATA 1CF830B0B000081 40203273D270B0 
50A303000000000 1 02840COE4BCE4D0A0500C 
9090 DATA OCOOOOOO08O4O2O2Q367 1 D67CB050 
A 4 O a 8 i 80000 a Q204040C0E6BSQC AOAOSOOS 4 8 
9100 DATA 1800000000120002280390052301 fl 
2002A0002Ü040009004200AC088C0022800AO 
9110 DATA 08400000000008010014000002480 
0000400000000 1 000004004002008008002 1 O 
9120 DATA 00070F3E1F3F3F262A262A3F3F3F3 
F3F3FC0E0E0F0F8FS98A898B8F8F8F8F8F8F8 
9130 DATA OOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
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RUTIWAS UTILES DE SONIDO 


Simulación del romper de las olas en 


Simulación del sonido emitido 


un acantilado 


helicóptero 


SOUND 7 , 2<B 110111 
SO UNI) 12,50:; SOUND : 
SOUND 6, 10: SOUND S 


lismo 


Sonido de alarma utilizando única- 


SOUND O 
SOUND 3 
SOUND 6 
SOUND 9 
SOUND i: 


SOUND 1 , 
SOUND 4, 
SOUND 7, 
SOUND 10 
SOUND 1 


mente el segundo canal 


10 SOUND 7 
20 SOUND 1 
30 SOUND 2 


&B1 1 1 101 
,5: SOUND 1 
1 70 s SOUND 


Simulación de un disparo de cañón 


seguido de una posterior explosión 


10 SOUND 7 
20 SOUND ó 
30 SOUND i: 


cBl 1011 1 
¡Os SOUND 8,16 
1 50 s SOUND 13,11 
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JORNADAS PROFESIONALES DE SIMO, dias 
20, 23, 24, 25, 26y 27. En estos días no habra 
taquilla desde las 10,30 hasta las 15 horas. En 
este periodo, y para la entrada en el recinto, 
será necesaria la tarjeta de profesional que 
le será facilitada al presentar su invitación 
o al acreditar su identidad. 

Congreso Internacional sobre Diseño y 
Confort en la Oficina, CIDYCO 87. 

Conferencia internacional de informática 
'87. Jornadas para profesionales. Conferencias 
sobre tecnologías especiales Coloquios sobre 
las implicaciones de la sociedad informatizada. 
Horario: de 10,30 a 20 horas. SIN INTERRUP- 
CION. Domingo de 10,30 a 15 horas. 

Prohibida la entrada a menores de 18 años 


IFEMA 
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queso digan 
que no das ni golpe 


Goody tiene un buen plan, pern ios grandes planes nunca son 
sencillos, por eso necesita un buen socio como tú, 
experimentado y audaz. 

Esta es tu oportunidad para dar el golpe del Siglo: 
el asalto al Gran Banco. 



so*=t 


Pza. Santa Catalina de los Donados, 3, 4 o Deha. 
28013 Madrid. Tel. 241 92 70 / 241 96 82 


Distribuidor en Cataluña 
Discovery Informatic 
Telfs (93) 256 49 08 - 09 


Si no lo encuentras en tu distribuidor habitual llámanos: (91) 241 92 70 - 241 96 82 










